Hi Rui,
By running your code on an example dataset:
set.seed(1)
dat1<-data.frame(Sno=sample(1:50,10,replace=TRUE),Data_1=rnorm(10,15),Data_2=rnorm(10,25),Data_3=runif(10,0.5))
dat2<-read.table(text="
Data_2
Data_3
",sep="",header=FALSE,stringsAsFactors=FALSE)
keep <- which(!names(dat2) %in% names(dat1))
dat1[, keep]
#[1] 14 19 29 46 11 45 48 34 32? 4
I guess, the OP needs both "Sno" and "Data_1" i the resultant dataframe.
#My code:
res<-dat1[!colnames(dat1)%in%dat2[,1]]
head(res)
# Sno?? Data_1
#1? 14 14.17953
#2? 19 15.48743
#3? 29 15.73832
#4? 46 15.57578
#5? 11 14.69461
#6? 45 16.51178
A.K.
----- Original Message -----
From: Rui Barradas <ruipbarradas at sapo.pt>
To: siddu479 <onlyfordigitalstuff at gmail.com>
Cc: r-help at r-project.org
Sent: Saturday, October 13, 2012 12:10 PM
Subject: Re: [R] Filtering few column from one data frame based on another data frame
Hello,
Try the following.
keep <- which(!names(data2) %in% names(data1))
data1[, keep]
Hope this helps,
Rui Barradas
Em 13-10-2012 15:48, siddu479 escreveu:
Dear R-Users and experts,
This is my first post in this forum.
I have two csv files file1 and file2.
file1(many rows and columns) is read into dataframe *data1*
File2 is read into dataframe *data2* which have only one column of data
which contains the column names that need to be removed from dataframe
*data1*columns and update the *data1 *data frame.
Example:
data1 <-read.csv(file1.......,header=T)
Sno,Data_1,Data_2,Data_3
1,2,3,4
data2<- read.csv(file2,......header=F)
Data_2
Data_3
The output *data1.new* data frame? should be like this
Sno,Data_1
1,2
So I request the R code to accomplish this task.
Regards
Sidda
--
View this message in context: http://r.789695.n4.nabble.com/Filtering-few-column-from-one-data-frame-based-on-another-data-frame-tp4646072.html
Sent from the R help mailing list archive at Nabble.com.