some statistics
This commit is contained in:
@@ -56,5 +56,6 @@ mainTable$supporter_signer_ratio = mainTable$supporters/mainTable$participants
|
||||
# Replace Na's with 0
|
||||
mainTable[is.na(mainTable)] <- 0
|
||||
|
||||
mainTable$zip2 <- floor(mainTable$zip/100)
|
||||
|
||||
write.xlsx(mainTable, file = "statistics_city_participation_by_zip.xls", row.names=F)
|
||||
|
||||
Reference in New Issue
Block a user