Carissimi,
Cerco di disegnare un cerchio in Graph Builder tramite il grafico personalizzato,
e si noti che il cerchio non si allinea con i punti dati.
Come posso fare in modo che il cerchio si trovi esattamente nella stessa posizione dei punti dati sulla tela?
Perché sembra funzionare per y e non per x? Esistono altri modi per raggiungere lo stesso risultato?
Grazie e cordiali saluti, Georg
Georg_0-1789394255151.pngGeorg_0-1789394255151.pngGeorg_0-1789394255151.png
New Table( "Circle Data",
Add Rows( 72 ),
Compress File When Saved( 1 ),
New Script(
"y coord vs. x coord", JSL Quote(Graph Builder(show control panel(0),
Size( 540, 540 ),
Variables( X( :x coord ), Y( :y coord ) ),
Elements( Points( X, Y, Legend( 4 ) ), Smoother( X, Y, Legend( 5 ) ) ),
SendToReport(
Dispatch( {}, "Graph Builder", FrameBox,
{Add Graphics Script( 2, Description( "" ), Circle( {0, 0}, 1 ) )}
)
)
);
) ,
As String( 1 )
),
New Column( "Degree", Numeric, "Continuous", Formula( Row() * 5 ), Set Display Width( 74 ) ),
New Column( "x coord", Numeric, "Continuous", Formula( Cosine( :Degree * (Pi() / 180) ) ), Set Selected, Set Display Width( 123 ) ),
New Column( "y coord", Numeric, "Continuous", Formula( Sine( :Degree * (Pi() / 180) ) ), Set Display Width( 123 ) )
);
Come disegnare un cerchio? Questo argomento viene trattato a circa tre quarti della pagina; potresti voler utilizzare l'opzione Dimensioni/Scala->Ridimensiona in isometrico .
La conversione da Dimensioni a Isometrico dovrebbe risolvere questo problema
Names Default To Here(1);
dt = New Table( "Circle Data",
Add Rows( 72 ),
Compress File When Saved( 1 ),
New Script(
"y coord vs. x coord", JSL Quote(Graph Builder(show control panel(0),
Size( 540, 540 ),
Variables( X( :x coord ), Y( :y coord ) ),
Elements( Points( X, Y, Legend( 4 ) ), Smoother( X, Y, Legend( 5 ) ) ),
SendToReport(
Dispatch( {}, "Graph Builder", FrameBox,
{Add Graphics Script( 2, Description( "" ), Circle( {0, 0}, 1 ) )}
)
)
);
) ,
As String( 1 )
),
New Column( "Degree", Numeric, "Continuous", Formula( Row() * 5 ), Set Display Width( 74 ) ),
New Column( "x coord", Numeric, "Continuous", Formula( Cosine( :Degree * (Pi() / 180) ) ), Set Selected, Set Display Width( 123 ) ),
New Column( "y coord", Numeric, "Continuous", Formula( Sine( :Degree * (Pi() / 180) ) ), Set Display Width( 123 ) )
);
gb = dt << Run Script("y coord vs. x coord");
framebox = Report(gb)[FrameBox(1)];
framebox << Size To Isometric;