I guess rbind takes attributes from the first dataframe.
I tried to rbind with mydata[NULL,,drop=FALSE] but rbind help states that
empy data frames are dropped from rbind.
So that as a workaround, I have:
mydata*<-* rbind(mydata[1,,drop=FALSE],newrow, mydata)[-1,]
Eric
On 23 November 2011 13:20, Smart Guy <smartguy3k@gmail.com> wrote:
> Hi All,
> I was adding a new row of data to my data frame using rbind(). I
> was surprised to see that after adding new row, I lost my data frame level
> attibute as well as col level attribute. Please help me to insert a new
> row at frist or middle position so that my custom attribute is not lost.
>
> Here is what I did.
>
> age<-c(15,20,18)
> weight<-c(40,42,30)
>
> ### creating my data frame ####
> mydata <- data.frame(age,weight)
>
> ### creating data frame level attribute ####
> attr(mydata,"myattr")<-c("myinfo")
>
> ### creating col level attribute for 'age' column ###
> attr(mydata$age,"mycolattr")<-c("mycolinfo")
>
> #### Checking attributes ###
> attributes(mydata)
> attributes(mydata$age)
>
> ### creating new row #####
> newrow <- data.frame(age=16, weight= 42)
>
> #### Inserting newrow as first row to my data frame ####
> mydata<- rbind(newrow, mydata)
>
> #### Checking attributes again ### I lost my custom attributes
> attributes(mydata$age)
> attributes(mydata)
>
>
> Thanks in advance,
>
>
> --
> SG
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
>
http://www.R-project.org/posting-guide.html<http://www.r-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.
>
--
Eric Lecoutre
Consultant - Business & Decision
Business Intelligence & Customer Intelligence
[[alternative HTML version deleted]]