| Author |
Comment/Response |
Randy Cameron
|
05/31/12 12:11pm
In Response To 'Re: Re: Re: Paired bubble color on a 3D Bubble ...' --------- Thank you for your time, I finally got it late yesterday. Now I need to figure out how to make the Y-axis log scale??? Seems simple for 2D plots but having it specified as a 3D BubbleChart seems to rule out the ScalingFunctions -> "Log" command. Here's how I got my colors, the ColorFunction ->
Function[{x, y, z, r},
Switch[{x, y, z, r},
is what did it.
BubbleChart3D[{{1, 1461000, 1, 500}, {1, 702500, 1.5, 418}, {1,
736200, 2.0, 400}, {1, 749100, 2.5, 382}, {1, 718000, 3.0,
460}, {2, 251800, 3.0, 40}, {2, 50250, 1.5, 81}, {2, 43590, 2.0,
100}, {2, 43880, 2.5, 118}},
ColorFunction ->
Function[{x, y, z, r},
Switch[{x, y, z, r}, {1, 1461000, 1, 500},
Blue, {1, 702500, 1.5, 418}, Red, {1, 736200, 2.0, 400},
Green, {1, 749100, 2.5, 382}, Yellow, {1, 718000, 3.0, 460},
Orange, {2, 251800, 3.0, 40}, Orange, {2, 50250, 1.5, 81},
Red, {2, 43590, 2.0, 100}, Green, {2, 43880, 2.5, 118}, Yellow]],
ColorFunctionScaling -> False]
URL: , |
|