Re: 3D Plot Manipulation

["Mark Hadfield" <m.hadfield(at)niwa.cri.nz>]

Re my previous post, I have tried a few different methods of representing a
3-D cloud of points in object graphics--see the attached .pro file. Having
one graphics atom per data point is terribly slow if the number of points
exceeds a few hundred. The best method I have been able to come up with so
far is to use a single text object with one string per data point. With this
method it's feasible to deal with a few thousand points.

---
Mark Hadfield
m.hadfield@niwa.cri.nz  http://katipo.niwa.cri.nz/~hadfield/
National Institute for Water and Atmospheric Research
PO Box 14-901, Wellington, New Zealand



begin 666 mgh_example_scatter.pro
M.R S1"!S8V%T=&5R('!L;W0-"@T*<')O(&UG:%]E>&%M<&QE7W-C871T97(L
M('-T>6QE+"!.7U!/24Y44SUN7W!O:6YT<PT*#0H@(" @8V]M<&EL95]O<'0@
M241,,@T*#0H@(" @:68@;E]E;&5M96YT<RAS='EL92D@97$@,"!T:&5N('-T
M>6QE(#T@, T*#0H@(" @:68@;E]E;&5M96YT<RAN7W!O:6YT<RD@97$@,"!T
M:&5N(&Y?<&]I;G1S(#T@,3 P#0H-"B @("!O8F%S92 ](&]B:E]N97<H)TU'
M2&=R1W)A<&@S1"<I#0H-"B @("!O8F%S92T^4V5T4')O<&5R='DL($Y!344]
M)S-$('-C871T97(@<&QO="<-"@T*(" @('@@/2!R86YD;VUN*'-E960L(&Y?
M<&]I;G1S*0T*(" @('D@/2!R86YD;VUN*'-E960L(&Y?<&]I;G1S*0T*(" @
M('H@/2!R86YD;VUN*'-E960L(&Y?<&]I;G1S*0T*#0H@(" @;V)A<V4M/DYE
M=T%X:7,L($1)4D5#5$E/3CTP+"!204Y'13U;+30L-%TL(%1)5$Q%/2=8)PT*
M(" @(&]B87-E+3Y.97=!>&ES+"!$25)%0U1)3TX],2P@4D%.1T4]6RTT+#1=
M+"!4251,13TG62<-"B @("!O8F%S92T^3F5W07AI<RP@1$E214-424]./3(L
M(%)!3D=%/5LM-"PT72P@5$E43$4])UHG#0H-"B @("!C87-E('-T>6QE(&]F
M#0H-"B @(" @(" @,#H@8F5G:6X-"B @(" @(" @(" @(#L@16%C:"!P;VEN
M="!I<R!R97!R97-E;G1E9"!B>2!A('-E<&%R871E('!L;W0@;V)J96-T+B!4
M:&ES(&ES#0H@(" @(" @(" @(" [('-L;W<@;VX@;&%R9V4@9&%T87-E=',N
M(%-Y;6)O;"!S='EL92 S(&ES(&%L;&5G960@=&\@9V5N97)A=&4@9&]T<PT*
M(" @(" @(" @(" @.R!B=70@:68@>6]U(&5N;&%R9V4@=&AE;2!E;F]U9V@@
M>6]U('=I;&P@<V5E('1H97D@87)E(&-I<F-L97,@:6X@=&AE#0H@(" @(" @
M(" @(" [('@M>2!P;&%N92X-"B @(" @(" @(" @(&9O<B!I/3 L;E]P;VEN
M=',M,2!D;R D#0H@(" @(" @(" @(" @(" @;V)A<V4M/DYE=U!L;W0L(%MX
M6VE=72P@6WE;:5U=+" O55-%7UI604Q512P@6E9!3%5%/7I;:5TL($Q)3D53
M5%E,13TV("0-"B @(" @(" @(" @(" @(" @(" @+"!364U"3TP];V)J7VYE
M=R@G241,9W)3>6UB;VPG+" S*0T*(" @(" @("!E;F0-"@T*(" @(" @(" Q
M.B!B96=I;@T*(" @(" @(" @(" @.R!%86-H('!O:6YT(&ES(')E<')E<V5N
M=&5D(&)Y(&$@<V5P87)A=&4@=&5X="!O8FIE8W0N(%-E96US('1O('1A:V4@
M=&AE#0H@(" @(" @(" @(" [('-A;64@=&EM92!A<R!T:&4@<&QO="!O8FIE
M8W1S+B!#87)E(&ES(&YE961E9"!T;R!G970@=&AE(&QA8F5L<R!C96YT<F5D
M#0H@(" @(" @(" @(" [(&]N('1H92!P;VEN=',-"B @(" @(" @(" @(&]B
M87-E+3Y.97=&;VYT+"!325I%/3$L($Y!344])TAE<G-H97DJ,R<L(%)%4U5,
M5#US>6UF;VYT#0H@(" @(" @(" @("!F;W(@:3TP+&Y?<&]I;G1S+3$@9&\@
M) T*(" @(" @(" @(" @(" @(&]B87-E+3Y.97=497AT+" G*R<L($Q/0T%4
M24].4SU;>%MI72QY6VE=+'I;:5U=+"!!3$E'3CTP+C4L(%9%4E1)0T%,7T%,
M24=./3 N-0T*(" @(" @("!E;F0-"@T*(" @(" @(" R.B!B96=I;@T*(" @
M(" @(" @(" @.R!4:&4@8VQO=60@;V8@<&]I;G1S(&ES(')E<')E<V5N=&5D
M(&)Y('-I;F=L92!T97AT(&]B:F5C="X@5&AI<R!I<R!M=6-H(&9A<W1E<BX-
M"B @(" @(" @(" @(&]B87-E+3Y.97=&;VYT+"!325I%/3$L($Y!344])TAE
M<G-H97DJ,R<L(%)%4U5,5#US>6UF;VYT#0H@(" @(" @(" @("!O8F%S92T^
M3F5W5&5X="P@<F5P;&EC871E*"<K)RP@;E]P;VEN=',I+"!,3T-!5$E/3E,]
M=')A;G-P;W-E*%M;>%TL6WE=+%MZ75TI("0-"B @(" @(" @(" @(" @(" L
M($%,24=./3 N-2P@5D525$E#04Q?04Q)1TX],"XU+"!&3TY4/7-Y;69O;G0-
M"B @(" @(" @96YD#0H-"B @(" @(" @,SH@8F5G:6X-"B @(" @(" @(" @
M(&1E;'1A(#T@,"XQ#0H@(" @(" @(" @(" [($5A8V@@<&]I;G0@:7,@<F5P
M<F5S96YT960@8GD@82!S97!A<F%T92!P;VQY;&EN92!O8FIE8W0@=VET:"!A
M('-H;W)T#0H@(" @(" @(" @(" [(&QI;F4@<V5G;65N="X@*$D@=')I960@
M>F5R;RUL96YG=&@@<V5G;65N=',@8G5T('1H97D@=V5R92!I;G9I<VEB;&4N
M*0T*(" @(" @(" @(" @.R!)="!T86ME<R!T:&4@<V%M92!T:6UE(&%S('1H
M92!O=&AE<B B;VYE(&]B:F5C="!P97(@<&]I;G0B(&%P<')O86-H97,N#0H@
M(" @(" @(" @("!F;W(@:3TP+&Y?<&]I;G1S+3$@9&\@) T*(" @(" @(" @
M(" @(" @(&]B87-E+3Y.97=!=&]M+" G241,9W)0;VQY;&EN92<L(%MX6VE=
M+61E;'1A+'A;:5TK9&5L=&%=+"!;>5MI72QY6VE=72P@6WI;:5TL>EMI75T-
M"B @(" @(" @96YD#0H-"B @("!E;F1C87-E#0H-"B @("!M9VA?;F5W+" G
M34=(9W)7:6YD;W<G+"!O8F%S92P@34]54T5?04-424]./3(-"@T*96YD#0H-
#"@T*
`
end