[R] Fw: Re: Help

Jeff Newmiller jdnewmil at dcn.davis.ca.us
Sun Apr 28 08:28:19 CEST 2013 

On Sat, 27 Apr 2013, Zilefac Elvis wrote:

> Hi Jeff,
> 
> Attached are sample files from the 110 files. When you delete those letters,
> some values will stay put in that same cell.
> Atem.

It looks like these are fixed format files. You should be using
read.fwf and write.fwf instead of read.table and write.table. Read
the help for those functions (e.g. ?read.fwf)

It is still not clear to me what you want the final result to look like, 
but you should have better luck reading the data with a fixed format
function.  You may well find that you no longer need to destroy the
contents of the files if you read the data you want correctly. I recommend
that you look closely at the source of your data for a detailed 
description of the data format to aid you in reading the data correctly.

> ----- Forwarded Message -----
> From: Zilefac Elvis <zilefacelvis at yahoo.com>
> To: arun <smartpink111 at yahoo.com>
> Sent: Saturday, April 27, 2013 9:14 PM
> Subject: Re: Re: [R] Help
> 
> 
>  Hi A.K,
> 
> Attached are example files. I have 110 of such and would like to perform the
> analysis as described before. I would find T, F, Y, A, C, etc and delete
> them. The letters are affixed to values in the data just to communicate an
> idea. As before, find all -9999.99M and replace with NA.
> 
> Thanks so much.
> Atem.
> 
> 
> 
> ____________________________________________________________________________
> From: arun <smartpink111 at yahoo.com>
> To: "zilefacelvis at yahoo.com" <zilefacelvis at yahoo.com>
> Cc: R help <r-help at r-project.org>
> Sent: Saturday, April 27, 2013 7:53 PM
> Subject: Re: Re: [R] Help
> 
> 
> 
> 
> 
> Hi,
> If you wanted to delete "T", "C","A", "F" and "Y" and replace "-999.99M"
> with NA, it is possible, but the result would be stored in a list if
> the number of elements deleted from each of the columns are different.   As
> you didn't provide any reproducible example, I don't know whether equal
> number of elements are replaced from each columns or not..
> 
> set.seed(28)
> myfiles<- lapply(1:5,function(i)as.data.frame(matrix(sample(c(LETTERS,"-999.99M"),40*i,replace=TRUE),ncol=(
> 40*i)/8),stringsAsFactors=FALSE))
> res<-lapply(myfiles,function(x){x[x=="-999.99M"]<-NA;lapply(x,function(y)
> y[!y%in%c("T","C","A","F","Y")])})
> res[[1]]
> #$V1
> #[1] "M" "X" "U" "X"
> #
> #$V2
> #[1] "P" "Z" "S" "R" "Q" "W" "N" "I"
> #
> #$V3
> #[1] "K" "S" NA  "M" "G" "G" "Z"
> #
> #$V4
> #[1] "O" "M" "G" "G" "B" "X" "M"
> #
> #$V5
> #[1] "I" "X" "P" "K" "R" "K"
> 
> A.K.
> ________________________________
> From: "zilefacelvis at yahoo.com" <zilefacelvis at yahoo.com>
> To: arun <smartpink111 at yahoo.com>
> Cc: R help <r-help at r-project.org>
> Sent: Saturday, April 27, 2013 9:41 PM
> Subject: Re: Re: [R] Help
> 
> 
> 
> 
> 
> 
> 
> Hi A.K,
> 
> 
> Thanks for  this great help. I wish to find -999.99M and replace with NA.
> All others like T, A, F etc should be deleted from the files.
> 
> 
> 
> 
> 
> Thanks for much.
> 
> ------ Original Message ------
> 
> 
> 
> From : arun
> >To : Zilefac Elvis;
> >Cc : R help;
> >Sent : 27-04-2013 16:29
> >Subject : Re: [R] Help
> > 
> >HI, "Find 'T','C','A','F' and 'Y', delete them from all the 110 files"
> I assume that you meant to replace it with NA. set.seed(28)
> myfiles<- lapply(1:5,function(i)as.data.frame(matrix(sample(c(LETTERS,"-999.99M"),40*i,replace=TRUE),ncol=(
> 40*i)/8),stringsAsFactors=FALSE)) myfiles[[1]]
> #  V1 V2       V3 V4 V5
> #1  A  P        K  O  Y
> #2  C  Z        S  M  Y
> #3  M  S -999.99M  G  I
> #4  X  R        M  G  X
> #5  C  Q        G  A  P
> #6  U  W        G  B  K
> #7  A  N        Z  X  R
> #8  X  I        F  M  K res<-lapply(myfiles,function(x) {x1<-unlist(x);
> x1[x1%in%c("-999.99M","T","C","A","F","Y")]<-NA;as.data.frame(matrix(x1,ncol=ncol(x)
> ),stringsAsFactors=FALSE)}) res[[1]] #   V1 V2   V3   V4   V5
> #1    P    K    O 
> #2    Z    S    M 
> #3    M  S      G    I
> #4    X  R    M    G    X
> #5    Q    G      P
> #6    U  W    G    B    K
> #7    N    Z    X    R
> #8    X  I      M    K lapply(seq_along(res),function(i)
> write.table(res[[i]],paste0("file",i,".txt"),row.names=FALSE,quote=FALSE))
> A.K. ----- Original Message -----
> From: Zilefac Elvis 
> To: "r-help at r-project.org" 
> Cc:
> Sent: Saturday, April 27, 2013 11:20 AM
> Subject: [R] Help Hello, I have a question and need your help urgently. I am
> new to R but want to learn it. I have several files in a folder which I have
> imported to R using :
> temp = list.files(pattern="*.txt")
> >myfiles = lapply(temp, read.delim)
> The resulting files are on the workspace stored as List[110]. So they are
> 110 files in the list. Each file has several different columns and rows.
> My question: I would like to find and replace -999.99M with NA; Find
> 'T','C','A','F' and 'Y', delete them from all the 110 files.
> Then, I want to write.table all the corrected files back to a folder on my
> computer.
> Thanks for your help.
> Atem. ________________________________
> From: "r-help-request at r-project.org"   Sent: Friday, April 26, 2013 11:08 AM
> Subject: confirm bfdc3137cee0135cf3c616295c9d0e2b3adfd392 Mailing list
> subscription confirmation notice for mailing list R-help We have received a
> request from 129.132.148.130 for subscription of r-help at r-project.org
> mailing list.  To confirm that you want to be
> added to this mailing list, simply reply to this message, keeping the
> Subject: header intact.  Or visit this web page:   https://stat.ethz.ch/mailman/confirm/r-help/bfdc3137cee0135cf3c616295c9d
> 0e2b3adfd392 Or include the following line -- and only the following line --
> in a
> message to r-help-request at r-project.org:    confirm
> bfdc3137cee0135cf3c616295c9d0e2b3adfd392 Note that simply sending a `reply'
> to this message should work from
> most mail readers, since that usually leaves the Subject: line in the
> right form (additional "Re:" text in the Subject: is okay). If you do not
> wish to be subscribed to this list, please simply
> disregard this message.  If you think you are being maliciously
> subscribed to the list, or have any other questions, send them to
> r-help-owner at r-project.org.    [[alternative HTML version deleted]]
> ______________________________________________
> R-help at 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
> and provide commented, minimal, self-contained, reproducible code.  
> 
> 
> 
> 
> 
>

---------------------------------------------------------------------------
Jeff Newmiller                        The     .....       .....  Go Live...
DCN:<jdnewmil at dcn.davis.ca.us>        Basics: ##.#.       ##.#.  Live Go...
                                       Live:   OO#.. Dead: OO#..  Playing
Research Engineer (Solar/Batteries            O.O#.       #.O#.  with
/Software/Embedded Controllers)               .OO#.       .OO#.  rocks...1k
---------------------------------------------------------------------------

More information about the R-help mailing list