Displaying 1 result from an estimated 1 matches for "areachange1".
Did you mean:
areachange
2011 Feb 28
1
plotting, graph, everything
...State"),m=c("Rice"))-> ricefile
cast(ricefile,State~Year+variable)->ricefile
names(ricefile)<- c("State","P1","P2","P3","P4")
(ricefile$P4-ricefile$P1)/ricefile$P1-> ricefile$areachange
ricefile$areachange*100->ricefile$areachange1
ricefile=ricefile[-1,]
plot(ricefile$areachange1 ~ ricefile$P1, col="red", col.axis=118,
col.lab=555, pch=17, xlab="Figure in 1960", ylab="Change over 1960 & 1990")
with(ricefile, plot(ricefile$areachange1,ricefile$P1))
with(ricefile, text(ricefile$P1,ricefile$area...