940815_de-DE

liliconcom

Versuch, die Transposition zu vermeiden

Ich habe ein funktionierendes Skript, das jedoch eine Transposition verwendet. Gibt es eine elegantere Lösung? Ich habe drei Spalten: Eine enthält einen quadratischen Koeffizienten (a), die zweite einen linearen Koeffizienten (b) und die dritte eine Konstante (c). Multipliziert man diese mit einer Eingabevariablen x, ergibt sich ein Bogen. Kann man diesen Bogen auch ohne Transponierung der Daten erzeugen? Derzeit erstelle ich Spalten mit inkrementellen Änderungen von x in einer transponierten Tabelle, aber die Daten sind sehr digital, und es gibt möglicherweise einen besseren Ansatz.

ax² + bx + c = 0

Automatisierung und SkripterstellungBetreff: Versuch, Transpositionen zu vermeiden

Schauen Sie sich die Y-Funktion an

Betreff: Versuch, Transpositionen zu vermeiden

Jim

Danke dafür, ich konnte bisher kein verständliches Beispiel dafür finden. Ich hatte schon vermutet, dass es einen besseren Weg gibt. Die Obergrenze von X wird übrigens auch in einer Spalte gespeichert.

Betreff: Versuch, Transpositionen zu vermeiden

Übertragen Sie die Werte aus Ihrer Tabelle in das Beispiel im Skriptindex. Werten Sie die Werte beispielsweise mit der Y-Funktion aus, z. B. mit Eval(EvalExpr()).

Names Default To Here(1);
New Window("Example",
	Graph Box(
		Pen Color("red");
		Y Function(20 + 40 * Sin(a / 30), a);
	)
);

Optional können Sie eine Formelspalte erstellen und den Profiler verwenden.

Betreff: Versuch, Transpositionen zu vermeiden

Ich habe es versucht, aber ich muss x mit 2 potenzieren, und genau da scheint das Problem zu liegen.

Names Default To Here(1);

dt = Current Data Table();

nw = New Window("window", vlb = V List Box());
For Each Row(dt,
	Eval(EvalExpr(
		vlb << Append(Graph Box(Y Function(Expr(dt[Row(), "HL_HR1_R"]) + Expr(dt[Row(), "HL_HR2_R"]) * x + Expr(dt[Row(), "HL_HR3_R"]) * Power (x, 2) ,x)));
	))
);

Betreff: Versuch, Transpositionen zu vermeiden

Woran liegt der Fehler? Gibt es eine Fehlermeldung? Ihr Code funktioniert, wenn ich ihn auf einer Testtabelle mit vier Zeilen ausführe. Eventuell muss ich die Achsen noch etwas anpassen.

Betreff: Versuch, Transpositionen zu vermeiden

Der Fehler war selbstverschuldet, da hast du recht, es gibt einen Plot. Ich habe noch zwei Herausforderungen vor mir.

1. Ich möchte alle Diagramme in einem einzigen Graphen darstellen.

2. Ich möchte x für jedes Diagramm auf einen Wert begrenzen, der in einer anderen Datenspalte gespeichert ist. Im Allgemeinen ist dieser Wert >100.

Betreff: Versuch, Transpositionen zu vermeiden

So etwas sollte funktionieren. Ich habe eine Spalte namens „X-Grenze“ hinzugefügt und dort ein paar Zahlen eingetragen.

Names Default To Here( 1 );

dt = Current Data Table();

nw = New Window( "window", gb = Graph Box( X Scale( 0, 120 ), Y Scale( 0, 35000 ) ) );
For Each Row(
	dt,
	Eval(
		Eval Expr(
			gb[FrameBox( 1 )] << Add Graphics Script(
				Y Function(
					Expr( dt[Row(), "HL_HR1_R"] ) + Expr( dt[Row(), "HL_HR2_R"] ) * x + Expr( dt[Row(), "HL_HR3_R"] ) * Power( x, 2 ),
					x,
					Max( Expr( dt[Row(), "X Limit"] ) )
				)
			)
		)
	)
);

Betreff: Versuch, Transpositionen zu vermeiden

Dieser Ansatz funktioniert zwar, ist aber deutlich langsamer als die Transpositionsmethode, die ich ursprünglich verwendet habe. Leider muss ich oft sehr viele Daten verarbeiten.