From: Bruce Colletti on
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
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


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
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
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"]
>
>
>
>
>
>