diff --git a/index.html b/index.html new file mode 100644 index 0000000..414b5a7 --- /dev/null +++ b/index.html @@ -0,0 +1,294 @@ + + +
+ +install.packages("devtools")
+
+devtools::install_github("hollorol/RBBGCMuso/RGBBCMuso")
+
+library(RBBGCMuso) +library(ggplot2) ++
beallitasok <- setupMuso()
+
+kimenet <- calibMuso(settings = beallitasok,skipSpinup=FALSE) +kimenet[1:6,1:2] ++
plot(kimenet[,"daily_gpp"])
+
+
+
par(mar=c(5,5,4,4)) +plot(y=kimenet[,"daily_gpp"], + x=as.Date(rownames(kimenet),"%d.%m.%Y"), xlab="Days", + ylab = expression(paste("daily GPP [",kg[C],m^-2,"]")), + type="l", col="blue", lwd="1.8") ++
+
plotMuso(variable="daily_gpp")
+
+
+
plotMuso(variable="daily_gpp")+ + labs(y=expression(paste("daily GPP [",kg[C],m^-2,"]"))) ++
+
musoMappingFind("yield")
+
+| 3037 | +cum_yieldC_HRV | +
plotMuso(variable="cum_yieldC_HRV")+ + labs(y=expression(paste("yield [",kg[C],m^-2,"]"))) ++
+
termesAlap <- plotMuso(variable="cum_yieldC_HRV")+ + labs(y=expression(paste("yield [",kg[C],m^-2,"]"))) ++
LAIAlap <- plotMuso(variable="proj_lai")+ + labs(y=expression( + paste("Levélfelületi index ",over(m^2,m^2)))) +LAIAlap ++
+