Jim se me adelantó, pero tuve la misma solución.Aquí hay un ejemplo con los datos del huracán donde trazo el personaje de una casa en algún lugar de Georgia o Carolina del Sur.
</CODE></PRE>
<P><SPAN class="lia-inline-image-display-wrapper lia-image-align-center" image-alt="Hurricanes.png" style="width: 826px;"><span class="lia-inline-image-display-wrapper" image-alt="Hurricanes.png" style="width: 826px;"><img src="https://us.v-cdn.net/6038925/uploads/images/20389i226EA6CD7DF77226/Hurricanes.png" role="button" title="Hurricanes.png" alt="Hurricanes.png" /></span></SPAN></P>
<P> </P></LINGO-BODY><LINGO-SUB id="lingo-sub-235525" slang="en-US">Re: Agregar punto de referencia al gráfico de burbujas</LINGO-SUB><LINGO-BODY id="lingo-body-235525" slang="en-US"><P>Bubble Plot usa FrameBox() para la visualización, y FrameBox() admite << Add Graphics Script, por lo que puedes hacer prácticamente lo que necesites.A continuación se muestra un script simple que se produjo agregando un script a través de la capacidad "Personalizar".</P>
<PRE><CODE class=" language-jsl">names default to here(1);
dt=open("$SAMPLE_DATA/Air Traffic.jmp");
Bubble Plot(
X( :Latitude ),
Y( :Longitude ),
Time( :Time ),
Time Index( 26.7000000000001 ),
Title Position( 35.75, -22.75 ),
SendToReport(
Dispatch(
{},
"1",
ScaleBox,
{Format( "Latitude DDD", "PUNDIR", 16, 0 ), Min( -2.5 ), Max( 72.5 ),
Inc( 5 ), Minor Ticks( 1 )}
),
Dispatch(
{},
"2",
ScaleBox,
{Format( "Longitude DDD", "PUNDIR", 16, 0 ), Min( -179.486111111111 ),
Max( 5.51388888888889 ), Inc( 10 ), Minor Ticks( 1 )}
),
Dispatch(
{},
"Bubble Plot",
FrameBox,
{Add Graphics Script(
4,
Description( "" ),
Text(
Center Justified,
{Col Mean( :latitude ), Col Mean( :Longitude )},
"_text_"
)
), DispatchSeg(
TopSeg( 1 ),
{Set Script(
Text(
Center Justified,
{Col Mean( :latitude ), Col Mean( :Longitude )},
"_text_"
)
)}
)}
)
)
);dt = Data Table("Hurricanes");
BP = dt << Bubble Plot(
X( :Longitude ),
Y( :Latitude ),
Sizes( :Name( "Wind (Knots)" ) ),
Time( :Date ),
Coloring( :Landfall in USA ),
ID( :Name and ID ),
Size as Sum( 0 ),
Speed( 60.44 ),
Trail Bubbles( 1 ),
Color Levels( [0 0.25 0.5 0.75 1] ),
Title Position( -88.679, 59.73 ),
SendToReport(
Dispatch(
{},
"1",
ScaleBox,
{Min( -110 ), Max( 10 ), Inc( 20 ), Minor Ticks( 0 ),
Rotated Labels( "Horizontal" )}
),
Dispatch(
{},
"2",
ScaleBox,
{Min( 0 ), Max( 70 ), Inc( 10 ), Minor Ticks( 0 ),
Rotated Labels( "Horizontal" )}
),
Dispatch(
{},
"Bubble Plot",
FrameBox,
{Frame Size( 465, 348 ), Background Map( Images( "Simple Earth" ) ),
Grid Line Order( 3 ), Reference Line Order( 2 )}
)
)
);
BP_rprt = Report(BP);
BP_rprt[framebox(1)] << Add Graphics Script(
Marker Size(10);
Marker( Color State("Orange"), Marker State("\!U2302"), {-80.4, 34.8})
);