Displaying 1 result from an estimated 1 matches for "natcor".
Did you mean:
  matcor
  
2012 Apr 09
1
Summary Statistics Help
...ues 
cor(datpat$Patents, datpat$FHouse)
# Conditional frequency count of data/time points by nation
by(datpat$Patents, datpat$Nation, length)
# Conditional correlations by nation
corbynation <- by(cbind(Patents = datpat$Patents, FHouse = datpat$FHouse),
datpat$Nation, cor)
length(corbynation)
natcor <- c()
for(i in 1:length(corbynation)){
	natcor <- c(natcor,unlist(corbynation[i])[2])
}
par(mar=c(4.5,4.5,5.5,1))
plot(natcor, type="p", pch=20, cex=2, axes=FALSE,
	main="Correlation of Patents and Freedom House Index by Nation",
	xlab="Nation", ylab="Corr...