noah/CS-7863-Sci-Stat-Proj-4
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare commits

base: noah:717e29c9f74a871337d10f83b36d695e69f5b558
Branches Tags
noah:main
..
compare: noah:4f39845b57f219b527a5d25824773b1907acb3d9
Branches Tags
noah:main

No commits in common. "717e29c9f74a871337d10f83b36d695e69f5b558" and "4f39845b57f219b527a5d25824773b1907acb3d9" have entirely different histories.
717e29c9f7 ... 4f39845b57

1 changed files with 1 additions and 1 deletions
Show Stats Expand all files Collapse all files

2
Schrick-Noah_Homework-4.R
View File

@ -385,7 +385,7 @@ orbiter.estimate <- findZeroRelax(orbiter.f, 1000000)
l <- orbiter.estimate[1]-r_earth l <- orbiter.estimate[1]-r_earth
x0_orbiter_tmp <- c(l, orbiter.f(l), 0)/1e3 # km x0_orbiter_tmp <- c(l, orbiter.f(l), 0)/1e3 # km
x0_orbiter <- x0_orbiter_tmp + x0_earth x0_orbiter <- x0_orbiter + x0_earth
y.init.orbiter <- c(x0_orbiter, v0_earth) y.init.orbiter <- c(x0_orbiter, v0_earth)
sunorbit.sol <- rk4sys(f=sunearth.f, a=0, b=365.25, y0=y.init.orbiter, n=365) sunorbit.sol <- rk4sys(f=sunearth.f, a=0, b=365.25, y0=y.init.orbiter, n=365)