From: Bruce Colletti on 11 Jan 2010 05:31 Re 7.0.1 under WinXP. Rotating the result of GraphData is easy, but how to title it? I haven't found a helptext example but guided by those found, my attempt below yields the message "Graphics is not a Graphics primitive or directive." Thanks. Bruce Graphics[Rotate[ GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], PlotLabel -> "hi"]
From: Mark McClure on 11 Jan 2010 18:51 On Mon, Jan 11, 2010 at 5:31 AM, Bruce Colletti <bwcolletti(a)verizon.net> wr= ote: > Re 7.0.1 under WinXP. > Rotating the result of GraphData is easy, but how to title it? > I haven't found a helptext example but guided by those found, my attempt > below yields the message "Graphics is not a Graphics primitive or > directive." > ... > Graphics[Rotate[ > GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], > PlotLabel -> "hi"] You could use Labeled: Labeled[Rotate[ GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], "hi", Top] Mark McClure
From: dh on 11 Jan 2010 18:51 Hi Bruce, you may e.g. use Panel: Panel[Rotate[ GraphData[{"CompleteTripartite", {2, 3, 5}}], -\[Pi]/ 2], "This is the title"] Daniel Bruce Colletti wrote: > Re 7.0.1 under WinXP. > > Rotating the result of GraphData is easy, but how to title it? > > I haven't found a helptext example but guided by those found, my attempt > below yields the message "Graphics is not a Graphics primitive or > directive." > > Thanks. > > Bruce > > Graphics[Rotate[ > GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], > PlotLabel -> "hi"] > > >
From: David Park on 11 Jan 2010 18:53 Needs["Presentations`Master`"] mygraph = GraphData[{"CompleteTripartite", {2, 3, 5}}] Draw2D[ {mygraph // DrawGraphics // RotateOp[-\[Pi]/2]}, PlotLabel -> "hi"] David Park djmpark(a)comcast.net http://home.comcast.net/~djmpark/ From: Bruce Colletti [mailto:bwcolletti(a)verizon.net] Re 7.0.1 under WinXP. Rotating the result of GraphData is easy, but how to title it? I haven't found a helptext example but guided by those found, my attempt below yields the message "Graphics is not a Graphics primitive or directive." Thanks. Bruce Graphics[Rotate[ GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], PlotLabel -> "hi"]
From: Jaebum Jung on 13 Jan 2010 05:56 or just use Labeled Labeled[Rotate[GraphData@{"CompleteTripartite",{2,3,5}},-\[Pi]/2],"hi",Top] or label first and then rotate Show[GraphData@{"CompleteTripartite",{2,3,5}},PlotLabel->"hi"]/.GraphicsComplex[data__]:>Rotate[GraphicsComplex[data],-Pi/2] - Jaebum On 1/11/10 5:53 PM, David Park wrote: > Needs["Presentations`Master`"] > > mygraph = GraphData[{"CompleteTripartite", {2, 3, 5}}] > > Draw2D[ > {mygraph // DrawGraphics // RotateOp[-\[Pi]/2]}, > PlotLabel -> "hi"] > > > David Park > djmpark(a)comcast.net > http://home.comcast.net/~djmpark/ > > > From: Bruce Colletti [mailto:bwcolletti(a)verizon.net] > > > Re 7.0.1 under WinXP. > > Rotating the result of GraphData is easy, but how to title it? > > I haven't found a helptext example but guided by those found, my attempt > below yields the message "Graphics is not a Graphics primitive or > directive." > > Thanks. > > Bruce > > Graphics[Rotate[ > GraphData@{"CompleteTripartite", {2, 3, 5}}, -\[Pi]/2], > PlotLabel -> "hi"] > > > > > >
|
Pages: 1 Prev: ODE Stiff Systems Next: restricting interpolating functions to be positive |