Re: [R] Leading plus in numeric fields

HI, As you are more number of columns which are numeric, try this: set.seed(1) dat1<-data.frame(OreTot=c(40,-7,41,35,7,15),GeoTot=c(TRUE,FALSE,TRUE,FALSE,TRUE,NA),OreCli=as.numeric(sample(1:25,6,replace=TRUE))) dat2<-dat1[sapply(dat1,is.numeric)] dat3<-data.frame(sapply(dat2,function(x) ifelse(

Re: [R] Leading plus in numeric fields

HI, You can also use "gsub" set.seed(1) dat1<-data.frame(OreTot=c(40,-7,41,35,7,15),GeoTot=c(TRUE,FALSE,TRUE,FALSE,TRUE,NA),OreCli=as.numeric(sample(1:25,6,replace=TRUE))) dat1[,1]<-ifelse(dat1[,1]>0,gsub("(\\d+)","+\\1",dat1[,1]),dat1[,1]) dat1[,3]<-ifelse(dat1[,3]>0,gsub("(\\d+)","+\\1",dat1[,3]

Re: [R] Leading plus in numeric fields

HI, Try this: set.seed(1) dat1<-data.frame(OreTot=c(40,-7,41,35,7,15),GeoTot=c(TRUE,FALSE,TRUE,FALSE,TRUE,NA),OreCli=as.numeric(sample(1:25,6,replace=TRUE))) dat1$OreTot<-ifelse(dat1$OreTot>0,formatC(dat1$OreTot,format="f",digits=1,flag="+"),dat1$OreTot) dat1$OreCli<-ifelse(dat1$OreCli>0,formatC(da

Re: [R] Leading plus in numeric fields

Hi > -Original Message- > From: r-help-boun...@r-project.org [mailto:r-help-bounces@r- > project.org] On Behalf Of Luca Meyer > Sent: Thursday, August 30, 2012 7:55 AM > To: R help > Subject: [R] Leading plus in numeric fields > > Hello R experts, > > I have go this data frame: > > 'dat