From rpeng at jhsph.edu  Thu Nov 24 17:30:50 2005
From: rpeng at jhsph.edu (Roger Peng)
Date: Thu, 24 Nov 2005 11:30:50 -0500
Subject: [Rd] write.csv ignores 'row.names'
In-Reply-To: <!~!UENERkVCMDkAAQACAAAAAAAAAAAAAAAAABgAAAAAAAAAhSZy0zcp30KH/pKqSCi9sMKAAAAQAAAAcIeg/3SLt0iaHwGiAYoTZgEAAAAA@schaltenbrand.de>
References: <!~!UENERkVCMDkAAQACAAAAAAAAAAAAAAAAABgAAAAAAAAAhSZy0zcp30KH/pKqSCi9sMKAAAAQAAAAcIeg/3SLt0iaHwGiAYoTZgEAAAAA@schaltenbrand.de>
Message-ID: <4385EABA.7070704@jhsph.edu>

Upon replying to this email, I took a look at 'write.csv()' and noticed 
something interesting.  I remember there being a discussion sometime in 
the past about letting 'write.csv()' accept the 'row.names' argument. 
However, I get the following error:

 > write.csv(airquality, file = "myfile.csv", row.names = F)
Error in write.table(airquality, file = "myfile.csv", row.names = F, 
col.names = NA,  :
         col.names = NA makes no sense when row.names = FALSE
 >

In 'write.csv()' there is

     rn <- Call$row.names
     Call$col.names <- if (is.logical(rn) && !rn)
         TRUE

but is.logical(rn) is always FALSE because even if 'row.names' is 
specified (non-NULL), it is of class "name".  Perhaps something like

rn <- eval(Call$row.names)

would suffice?  I can't tell if that would break anything.

-roger

Sven Schaltenbrand wrote:
> hallo,
>  
> i have a problem by writing a csv file
> the first colum is filled with index numbers from 1 to n.
> i have to unique two csv files once a week while one file is always the
> same.
> can anybody tell me, how to write the dataset into a csv file without the
> first row of the indexnumbers.
> x[,-1] does not wok as it eliminates the first "interesting" colum.
> col.names is not accepted by r (do i habe to start a package first? which
> one?)
>  
> thx
>  
> sven
> 
> 	[[alternative HTML version deleted]]
> 
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>



[Rd] write.csv ignores 'row.names'
Roger Peng