Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Branch: master
Fetching contributors…

Cannot retrieve contributors at this time

19 lines (18 sloc) 0.855 kB
statistics_blogs <- read.csv("~/Dropbox/classes/sna/project/out/statistics_blogs.csv")
viewData(statistics_blogs)
blog_clus <- read.delim("~/Dropbox/classes/sna/project/out/blog_clus.txt", header=F)
viewData(blog_clus)
all_data <- merge(statistics_blogs,blog_clus,by.x="Id",by.y="V2")
viewData(all_data)
with(all_data,chisq.test(V1,Modularity.Class))
len(unique(all$data$V11))
length(unique(all$data$V1))
length(unique(all_data$V1))
length(unique(all_data$Modularity.Class))
25*14
statistics_blogs <- read.csv("~/Dropbox/classes/sna/project/out/statistics_blogs.csv")
blog_clus <- read.delim("~/Dropbox/classes/sna/project/out/blog_clus.txt", header=F)
all_data <- merge(statistics_blogs,blog_clus,by.x="Id",by.y="V2")
with(all_data,chisq.test(V1,Modularity.Class))
with(all_data,table(V1,Modularity.Class))
with(all_data,chisq.test(V1,Modularity.Class))
Jump to Line
Something went wrong with that request. Please try again.