Displaying 4 results from an estimated 4 matches for "log2pfdea".
2018 Apr 20
1
create multiple categorical variables in a data frame using a loop
...s its intervals from 1, so 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 proce...
2018 Apr 19
4
create multiple categorical variables in a data frame using a loop
...,0.25, na.rm =T)
&pfas.pheno$log2pfoa <=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...
2018 Apr 19
0
create multiple categorical variables in a data frame using a loop
...`findInterval` numbers its intervals from 1, so 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...
2018 Apr 19
0
create multiple categorical variables in a data frame using a loop
...&pfas.pheno$log2pfoa <=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] <= quan...