search for: log2pfhxs

Displaying 4 results from an estimated 4 matches for "log2pfhxs".

2018 Apr 20
1
create multiple categorical variables in a data frame using a loop
...rting at 0 just subtract 1. > > >> However, I have additional 7 similar variables, so I wrote the following code, but it does not work. >> >> for (i in c("log2pfoa","log2pfos", "log2pfna", "log2pfdea", "log2pfuda", "log2pfhxs", "log2et_pfosa_acoh", "log2me_pfosa_acoh")) { >> cat.var <- paste0("cat.",i) >> pfas.pheno <- within(pfas.pheno, {eval(parse(text= cat.var))<-NA > > Nope. Cannot use R like a macro processor, at least not easily. R names are not the s...
2018 Apr 19
4
create multiple categorical variables in a data frame using a loop
...pfoa <=quantile(pfas.pheno$log2pfoa,0.75, na.rm =T)]<-1 } However, I have additional 7 similar variables, so I wrote the following code, but it does not work. for (i in c("log2pfoa","log2pfos", "log2pfna", "log2pfdea", "log2pfuda", "log2pfhxs", "log2et_pfosa_acoh", "log2me_pfosa_acoh")) { cat.var <- paste0("cat.",i) pfas.pheno <- within(pfas.pheno, {eval(parse(text= cat.var))<-NA eval(parse(text=cat.var))[pfas.pheno[,i] <= quantile(pfas.pheno[,i],0.25, na.rm =T)] <- 0 eval(parse(text=ca...
2018 Apr 19
0
create multiple categorical variables in a data frame using a loop
...to get a sequence starting at 0 just subtract 1. > However, I have additional 7 similar variables, so I wrote the following code, but it does not work. > > for (i in c("log2pfoa","log2pfos", "log2pfna", "log2pfdea", "log2pfuda", "log2pfhxs", "log2et_pfosa_acoh", "log2me_pfosa_acoh")) { > cat.var <- paste0("cat.",i) > pfas.pheno <- within(pfas.pheno, {eval(parse(text= cat.var))<-NA Nope. Cannot use R like a macro processor, at least not easily. R names are not the same as character v...
2018 Apr 19
0
create multiple categorical variables in a data frame using a loop
...eno$log2pfoa,0.75, na.rm =T)]<-1 > } > > However, I have additional 7 similar variables, so I wrote the following code, but it does not work. > > for (i in c("log2pfoa","log2pfos", "log2pfna", "log2pfdea", "log2pfuda", "log2pfhxs", "log2et_pfosa_acoh", "log2me_pfosa_acoh")) { > cat.var <- paste0("cat.",i) > pfas.pheno <- within(pfas.pheno, {eval(parse(text= cat.var))<-NA > eval(parse(text=cat.var))[pfas.pheno[,i] <= quantile(pfas.pheno[,i],0.25, na.rm =T)] <- 0 &gt...