Dear Arun and Jim,
Thanks for your replies. I will be extremely careful next time.Anyway, here is the dput format of dat
> dput(dat)
structure(list(Date = c("1-Jan-61", "2-Jan-61", "3-Jan-61", "4-Jan-61", "5-Jan-61", "6-Jan-61", "7-Jan-61", "8-Jan-61", "9-Jan-61", "10-Jan-61"), A = c(0, 6.1, 0, 0, 0, 0, 0, 0, 0, 0), B = c(1.27, 9.144, 0.508, 0, 0, NA, 0, NA, NA, 4.064), C = c(8.128, 94.742, 1.27, NA, 0, 0, 0, 0, 0, 4.826), D = c(0.25, 15.49, 0, 0, 0, 0, 0, 0, NA, 0.76)), .Names = c("Date", "A", "B", "C", "D"), class = "data.frame", row.names = c(NA, -10L))
> dput(res)
structure(list(A = c("", "", ""), B = c("6-Jan-61", "8-Jan-61", "9-Jan-61"), C = c("4-Jan-61", "", ""), D = c("9-Jan-61", "", "")), .Names = c("A", "B", "C", "D"), row.names = c(NA, -3L), class = "data.frame") Eliza

> Date: Wed, 19 Mar 2014 12:11:43 -0700
> From: smartpink111@yahoo.com
> Subject: Re: [R] reading row title
> To: eliza_botto@hotmail.com
> 
> BTW, if you had looked at your post, you would understand how HTML mangled your post.á It is better to dput().á You are posting for sometime now, so I hope you understand it...
> 
> 
> 
> 
> On Wednesday, March 19, 2014 3:04 PM, arun <smartpink111@yahoo.com> wrote:
> Hi,
> 
> dat <- read.table(text="Dateáá Aááá Báá Cááá D
> 1-Jan-61áá 0.00á 1.27áá 8.128á 0.25
> 2-Jan-61 6.10 9.144 94.742 15.49
> 3-Jan-61á 0.00 0.508á 1.27 0.00
> 4-Jan-61á 0.00á 0á NA 0.00
> 5-Jan-61á 0.00á 0á 0 0.00
> 6-Jan-61áá 0.00á NAá 0 0.00
> 7-Jan-61á 0.00á 0á 0 0.00
> 8-Jan-61á 0.00á NAá 0 0.00
> 9-Jan-61á 0.00á NAá 0 NA
> 10-Jan-61 0.00 4.064 4.826 0.76",sep="",header=TRUE,stringsAsFactors=FALSE)
> 
> res <-á as.data.frame(apply(dat[,-1],2,FUN=function(x) {x1 <-dat[,1][is.na(x)]; x2 <- max(colSums(is.na(dat[,-1]))); if(length(x1) < x2) c(x1, rep("",x2-length(x1))) else x1}),stringsAsFactors=FALSE)
> 
> 
> A.K.
> 
> 
> 
> On Wednesday, March 19, 2014 2:39 PM, eliza botto <eliza_botto@hotmail.com> wrote:
> Dear R-Family,
> I have a data-set of the following format. I am only presenting a part of it.
> Dateá á á á á á á á Aá á á á á á á áá Bá á á á á á á á á á á á áá Cá á á á á á á á á á á á á á á á áá D
> 
> 
> 
> 
> 
> 
> 
> á 1-Jan-61
> á 0.00
> á 1.27
> á 8.128
> á 
> á 0.25
> 
> 
> á 
> 2-Jan-61
> á 
> 6.10
> á 
> 9.144
> á 
> 94.742
> á 
> á 
> 
> 15.49
> 
> 
> 
> 
> á 3-Jan-61
> á 0.00
> á 0.508
> á 1.27
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 4-Jan-61
> á 0.00
> á 0
> á NA
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 5-Jan-61
> á 0.00
> á 0
> á 0
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 6-Jan-61
> á 0.00
> á NA
> á 0
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 7-Jan-61
> á 0.00
> á 0
> á 0
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 8-Jan-61
> á 0.00
> á NA
> á 0
> á 
> á 
> 0.00
> 
> 
> 
> 
> á 9-Jan-61
> á 0.00
> á NA
> á 0
> á 
> á 
> NA
> 
> 
> 
> 
> á 
> 10-Jan-61
> á 
> 0.00
> á 
> 4.064
> á 
> 4.826
> á 
> 
> 
> á 
> 0.76
> 
> You can see that each column has some NAs in it, What i want to do is to learn that which date has NA for each column. 
> Here it should be something like the following
> 
> Aá á á á á á á á á á á á á áá Bá á á á á á á á á á á á á á á á Cá á á á á á á á á á á á á á á á á á á á D
> á á á á á á á á á á áá 6-Jan-61á á á á á á á á á á á á áá 4-Jan-61á á á á á á á á á á á áá 9-Jan-61
> á á á á á á á á á á áá 8-Jan-61
> á á á á á á á á á á áá 9-Jan-61
> 
> Thankyou very much in advance
> 
> Eliza ááá áááá ááá áá ááá ááá á 
> ááá [[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
> and provide commented, minimal, self-contained, reproducible code.
> 
 		 	   		  
	[[alternative HTML version deleted]]


