Erweiterung einer Liste

Julian Apostata shared this question 2 years ago
Answered

Ich habe folgende Primzahlenliste

L={2,3,5,7,11,13,17,19,23,29,31,37}

Nun möchte ich folgende 12 Produkte erstellen.

1*2=2

1*2*3=6

1*2*3*5=30

1*2*3*5*7=210 und so weiter, so dass am Schluss

7420738134810 raus kommt.

Diese 12 Produkte sollen in einer Liste zusammengefasst sein. Und ich möchte dies mit nur einem einzigen Folge-Befehl realisieren. Das wäre eigentlich eine simple Angelegenheit wenn bei dem Befehl Anfügen[M, a] nicht wieder eine neue Liste erstellt würde.

Ich möchte also nur an die Liste M das Element a hinzu fügen, ohne eine neue Liste zu erhalten. Kennt da jemand eine einfache Lösung?

Meine bisherige Lösung schaut so aus. a setze ich zunächst auf 1. Und den Schieberegler n (ganze Zahl) definiere ich von 0 bis 12. Nach jedem Sprung nach vorne werden dann die beiden Skriptingbefehle ausgeführt.

SetzeWert[a,a*L(n)]

SetzeWert[M, Verbinde[M, {a}]]

Leider funktioniert der Folgebefehl nicht in Verbindung mit SetzeWert.

Comments (3)

photo
1

setzewert(liste,index,wert)

kann auch einfache listen beschreiben-

photo
1

Ich würde das nicht mit Skripts lösen, sondern mit:

Folge(Produkt(L, n), n, 1, Länge(L))

als normales Objekt in der Algebraview.

photo
1

Danke. Ich hab es jetzt so gemacht.

P=EntferneUndefiniert[Folge[Wenn[IstPrimzahl[n], n], n, 1, 37]]

L=Folge[Produkt[P, n], n, 1, 12]

© 2023 International GeoGebra Institute