source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
obj1
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
obj1
new_y = 7.991+ x1* 6.620
lines(x1, new_y)
fix(obj2)
fix(obj1)
fix(obj1)
abline(obj1)
help(abline)
help(coef)
coef(fit_y ~ poly(fit_x, 1))
coef(lm(fit_y~ fit_x))
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
help(points)
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
par(ylab = "Observed quantity")
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
fix(est_params)
coef(lm(trial_y ~ poly(x, 1)))
plot(x, trial_y, type = "p")
abline(est_params)
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
coef(lm(trial_y ~ poly(x, 1)))
fix(est_y)
help(coef)
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
est_params
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
est_params
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/class_ex_1/class_ex_1_v2_done.R')
source('~/Documents/Work/risk_analysis/patricks_labs/lab_5/lab5_main_v3_original.R')
365.25/ 12
x = seq(0.5, 30.4375, 1.0)
x
10^6*365.25*24*60^2
6.088* 10^6/ 3.15576e+13
6.088* 10^12/ (3.15576* 10^13)
help(sin2)
??sin2
source('~/Documents/Work/risk_analysis/patricks_labs/probset_1/probset_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/probset_1/probset_1.R')
source('~/Documents/Work/risk_analysis/patricks_labs/probset_1/probset_1.R')
help(rnorm)
rnorm(1, 0, 0.5)
rnorm(1, 0, 0.5)
source('~/Documents/Work/risk_analysis/patricks_labs/lab_6/autocorr_test.R')
help(root)
help(sqrt)
(10^6)^ (1/14)
3^ 14
14!
factorial
help(factorial)
factorial(14)
help(cdf)
help(cdfplot)
help(ecdf)
help(array)
100* (1+ 0.03)^ 10
1000/ (1+ 0.03)^ 10
help(require)
source('~/Documents/Work/simple_model/grid_tool/grid_tool_v2.R')
temp_curve_RCP3PD_1950to2500 <- read.table("~/Documents/Work/mapping_Eem_2100/temp_curves/temp_curve_RCP3PD_1950to2500.dat", quote="\"")
viewData(temp_curve_RCP3PD_1950to2500)
rstudio::viewData(temp_curve_RCP3PD_1950to2500)
mean(temp_curve_RCP3PD_1950to2500[56:551, 2])
mean(temp_curve_RCP3PD_1950to2500[546:551, 2])
RCP4p5 <- read.table("~/Documents/Work/mapping_Eem_2100/temp_curves/temp_curve_RCP4p5_1950to2500.dat", quote="\"")
viewData(RCP4p5)
mean(RCP4p5[56:551, 2])
mean(RCP4p5[546:551, 2])
mean(temp_curve_RCP3PD_1950to2500[521:551, 2])
mean(RCP4p5[521:551, 2])
temp_curve_RCP6p0_1950to2500 <- read.table("~/Documents/Work/mapping_Eem_2100/temp_curves/temp_curve_RCP6p0_1950to2500.dat", quote="\"")
viewData(temp_curve_RCP6p0_1950to2500)
mean(temp_curve_RCP6p0_1950to2500[56: 551, 2])
mean(temp_curve_RCP6p0_1950to2500[521: 551, 2])
RCP8p5 <- read.table("~/Documents/Work/mapping_Eem_2100/temp_curves/temp_curve_RCP8p5_1950to2500.dat", quote="\"")
viewData(RCP8p5)
mean(RCP8p5[56: 551, 2])
mean(RCP8p5[521: 551, 2])
5* 10-4* 10^4
5* 10^-4* 10^4
3^14
install.packages('shiny')
install.packages('shiny')
help(shiny)
require(shiny)
help(shiny)
1/ 0
1/ -0
require(maps)
help(map)
map(regions = "Antarctica")
map("worldHires","Antarctica",xlim=c(-90,-60),ylim=c(-180,180),col="gray90",fill=TRUE)
map(regions = "Antarctica",xlim=c(-90,-60),ylim=c(-180,180),col="gray90",fill=TRUE)
map(regions = "Antarctica",xlim=c(-90,90),ylim=c(-180,180),col="gray90",fill=TRUE)
map(regions = "Antarctica",xlim=c(-180,180),ylim=c(-90,90),col="gray90",fill=TRUE)
map("worldHires","Canada”, xlim=c(-141,-53), ylim=c(40,85), col="gray90”, fill=TRUE)
map("worldHires","Canada”, xlim=c(-141,-53), ylim=c(40,85), col="gray90”, fill=TRUE)
map("worldHires","Canada”, xlim=c(-141,-53), ylim=c(40,85), col="gray90”)
help(mapproj)
install.packages("mapproj")
map(regions = "Antarctica", projection = "gnomonic", xlim=c(-180,180),ylim=c(-90,90),col="gray90",fill=TRUE)
map(regions = "Antarctica", projection = "stereographic", xlim=c(-180,180),ylim=c(-90,90),col="gray90",fill=TRUE)
map(regions = "Antarctica", projection = "azequalarea", xlim=c(-180,180),ylim=c(-90,90),col="gray90",fill=TRUE)
map(regions = "Antarctica", projection = "azequalarea", xlim=c(-180,180),ylim=c(-90,90),col="gray90",fill=FALSE)
require(maps)
help(maps)
help("maps")
require(maps)
mapproj
help(mapproj)
??mapproj
mapproject
require(mapproj)
help(mapproject)
require(signal)
help(interp1)
(7.4-6)/ mean(c(6, 7.4))
help.start()
3+ 2
x = rnorm(50)
hist(x)
help(rnorm)
c(1, 2)+ c(3, 4)
x
help(rnorm)
1/exp(1)* 7.3
source('~/Documents/Work/curve_fitting/prelim_fit.R')
setwd("~/Documents/Work/curve_fitting")
source('~/Documents/Work/curve_fitting/prelim_fit.R')
help(max)
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
fix(V)
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
fix(V)
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
1/ k
source('~/Documents/Work/curve_fitting/logistic_test.R')
k
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
source('~/Documents/Work/curve_fitting/logistic_test.R')
t_delta_T = read.table("temp_curve_RCP8p5_1950to2500.dat")
setwd("~/Documents/Work/geoengineering")
t_delta_T = read.table("temp_curve_RCP8p5_1950to2500.dat")
View(t_delta_T)
yr = seq(2025, 2475, 50)
yr
plot(t_delta_T[, 1], t_delta_T[, 2], typ = "l")
help(matrix)
help(array)
source('~/.active-rstudio-document')
plot(control[, 1], control[, 2], typ = "l")
View(control)
source('~/.active-rstudio-document')
length(yr)
length(schewe_8p5[, 1])+ 1
source('~/.active-rstudio-document')
plot(control[, 1], control[, 2], typ = "l")
help(write)
help(round)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help.search("empty")
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help(array)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help("concatenate")
help.search("concatenate")
i = 1
file = paste("temp_curve_rcp8p5_equil", geo_start_year[i], "1950to5000.dat", sep = "")
file = paste("temp_curve_rcp8p5_equil", geo_start_yr[i], "1950to5000.dat", sep = "")
file
write.table(control, file = file_name)
file_name = paste("temp_curve_rcp8p5_equil", geo_start_yr[i], "1950to5000.dat", sep = "")
write.table(control, file = file_name)
row_end = geo_start_yr[i]- schewe_8p5[, 1]
equil = array(dim = c(length(yr), 3))
equil[, 2] = yr
equil[1: row_end, 3] = schewe_8p5[1: row_end, 2]
equil[(row_end+ 1): length(yr), 3] = schewe_8p5[row_end, 2]
equil[, 3] = round(equil[, 3], 3)
row_end = geo_start_yr[i]- schewe_8p5[, 1]
row_end
row_end = geo_start_yr[i]- schewe_8p5[1, 1]
equil = array(dim = c(length(yr), 3))
equil[, 2] = yr
equil[1: row_end, 3] = schewe_8p5[1: row_end, 2]
equil[(row_end+ 1): length(yr), 3] = schewe_8p5[row_end, 2]
equil[, 3] = round(equil[, 3], 3)
plot(equil[, 2], equil[, 3], typ = "l")
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
plot(equil[, 2], equil[, 3], typ = "l")
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
plot(equil[, 2], equil[, 3], typ = "l")
lines(equil[, 2], equil[, 3], typ = "l", col = "red")
lines([, 2], control[, 3], typ = "l", col = "red")
lines(control[, 2], control[, 3], typ = "l", col = "red")
plot(equil[, 2], equil[, 3], typ = "l")
lines(control[, 2], control[, 3], typ = "l", col = "red")
View(schewe_8p5)
fix(geo_start_yr)
help(colors)
demo("colors")
cl <- colors()
length(cl); cl[1:20]
colors()
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help(zero)
help(colors)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help(seq)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
(length(yr)- row_end- 1)
seq(from = -m, by = -m, length.out = (length(yr)- row_end- 1)
)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
seq(from = -m, by = -m, length.out = (length(yr)- row_end- 1))
row_end
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
schewe_8p5[row_end, 2]
View(grad)
help(max)
help(ceil)
help(ceiling)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
max(schewe_8p5[2: length(schewe_8p5[, 1]), 2]- schewe_8p5[1: (length(schewe_8p5[, 1])- 1), 2])
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
grad[(row_end+ 1): length(yr), 3] < 0
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
(row_end+ 1): length(yr)
grad[(row_end+ 1): length(yr), 3]
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
help(gt)
help.search("greater than")
help.search(">")
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
View(grad)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
View(grad)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
View(grad)
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curves/temp_curve_writer.R')
setwd("~/Documents/Work/geoengineering/temp_curves")
source('~/Documents/Work/geoengineering/temp_curves/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curves/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curves/temp_curve_writer.R')
source('~/Documents/Work/geoengineering/temp_curves/temp_curve_writer.R')
