TD : Vitesse orbitale de la Terre Traitement sous GeoGebra Données à entrer dans le tableur ou la fenêtre de saisie. Séquences des spectres : speta1=Séquence[ Segment[(i-1,Elément[leta1,i]+dy1),(i,Elément[leta1,i+1]+dy1)],i,1,1700] speta2=Séquence[Segment[(i-1,Elément[leta2,i]+dy2),(i,Elément[ leta2,i+1]+dy2)],i,1,1700] spetoile=Séquence[Segment[(i-1,Elément[letoile,i]/2+dye),(i,Elément[ letoile,i+1]/2+dye)],i,1,1700] Raies d'étalonnage 442.731 444.234 444.772 446.165 446.654 447.602 449.457 Liste des coordonnées des points d'étalonnage x_p = {E1, E2, E3, E4, E5, E6, E7} y_p = {A1, A2, A3, A4, A5, A6, A7} P{Eta} =Séquence[Points(Elément[x_p, i], Elément[y_p, i]), i, 1, 7] Droite de regression : dr_{Eta} = AjustLin[P_{Eta}]