backup/7_transformarChile1217.R

data.ed<-chile_1217
ix <- 3:31 #This depends on the dataframe, so be careful
data.ed[ix] <- lapply(data.ed[ix], as.numeric) 
names(data.ed)<-gsub('\\.',"",names(data.ed))
data.ed$lbetw<-log(data.ed$betweeness);data.ed$lbetw[is.infinite(data.ed$lbetw)]<-NA
mguevara/HES documentation built on Feb. 20, 2020, 12:45 a.m.