An embedded and charset-unspecified text was scrubbed... Name: not available URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20110817/1cb64db7/attachment.pl>
Labelling all variables at once (using Hmisc label)
4 messages · Monsieur Do, Frank E Harrell Jr, David Winsemius +1 more
I'm puzzled. I provided a solution that did not require looping. Frank
Monsieur Do wrote:
I did read the help page before posting, but didn't find the direct way...
My function here works fine. But just for learning purposes, I'd like to
be able to avoid the loop...
with.labels <- function(x, labels=NULL, csvfile=NULL) {
if(!is.null(csvfile)) labels <- read.csv(csvfile, sep="\t", header=F,
stringsAsFactors=F)[,1]
for(i in 1:length(x)) label(x[,i]) <- labels[i]
if(length(labels) != length(x)) cat("Warning: data and labels are not of
same length\n")
return(x)
}
Thanks
Message: 11 ?Date: Tue, 16 Aug 2011 04:22:07 -0700 (PDT) ?From:
Frank Harrell <f.harrell at vanderbilt.edu>
?To:
r-help at r-project.org
?Subject:
Re: [R] Labelling all variables at once (using Hmisc label)
?Message-ID:
<1313493727519-3746928.post at n4.nabble.com>
?Content-Type:
text/plain; charset=UTF-8
? ?Do
require(Hmisc); ?label to see the help file for label.? It will show you
?how to
do this:
?? ?Monsieur
Do wrote:
?>
I have a dataset and a list of labels. I simply want
?> to
apply the labels to the variables, all at once. The only way I was able
?> to?do
it was using a loop:
?> ?> for (i in?1:length(data)) label(data[,i]) <-data.labels[i] ?> ?> I'd like to find the non-loop way to do it, using
?>
apply or the like... Any help appreciated.
?> ?-----
?Frank
Harrell
?Department
of Biostatistics, Vanderbilt University [[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.
----- Frank Harrell Department of Biostatistics, Vanderbilt University -- View this message in context: http://r.789695.n4.nabble.com/Labelling-all-variables-at-once-using-Hmisc-label-tp3745660p3751273.html Sent from the R help mailing list archive at Nabble.com.
On Aug 17, 2011, at 5:49 PM, Frank Harrell wrote:
I'm puzzled. I provided a solution that did not require looping. Frank
Hi Frank;
Do you realize that some portions of your Nabble postings are not
being communicated to the ordinary mail-clients? This code did not
appear in my copy from Nabble. I didn't cut anything. This appears in
Nabble when you look there:
> d <- data.frame(a=1:2,b=3:4)
> label(d, self=FALSE) <- c('A','B')
> contents(d)
Data frame:d 2 observations and 2 variables Maximum # NAs:0 Labels
Storage a A integer
b B integer
I observed and noted that was happening in a prior message. The
missing formatted Nabble studd also comes across without linefeeds
when pasted, so I added some of those back in.
David.
>
> Monsieur Do wrote:
>>
>> I did read the help page before posting, but didn't find the direct
>> way...
>> My function here works fine. But just for learning purposes, I'd
>> like to
>> be able to avoid the loop...
>>
>> with.labels <- function(x, labels=NULL, csvfile=NULL) {
>> if(!is.null(csvfile)) labels <- read.csv(csvfile, sep="\t", header=F,
>> stringsAsFactors=F)[,1]
>> for(i in 1:length(x)) label(x[,i]) <- labels[i]
>> if(length(labels) != length(x)) cat("Warning: data and labels are
>> not of
>> same length\n")
>> return(x)
>> }
>>
>> Thanks
>>
>>> Message: 11
>>> Date: Tue, 16 Aug 2011 04:22:07 -0700 (PDT)
>>> From:
>> Frank Harrell <f.harrell at vanderbilt.edu>
>>> To:
>> r-help at r-project.org
>>> Subject:
>> Re: [R] Labelling all variables at once (using Hmisc label)
>>> Message-ID:
>> <1313493727519-3746928.post at n4.nabble.com>
>>> Content-Type:
>> text/plain; charset=UTF-8
>>>
>>> Do
>> require(Hmisc); ?label to see the help file for label. It will
>> show you
>>> how to
>> do this:
>>>
>>> Monsieur
>> Do wrote:
>>> >
>> I have a dataset and a list of labels. I simply want
>>
>>> > to
>> apply the labels to the variables, all at once. The only way I was
>> able
>>> > to do
>> it was using a loop:
>>> >
>>> > for (i in 1:length(data)) label(data[,i]) <-data.labels[i]
>>> >
>>> > I'd like to find the non-loop way to do it, using
>>
>>> >
>> apply or the like... Any help appreciated.
>>> >
>>> -----
>>
>>> Frank
>> Harrell
>>> Department
>> of Biostatistics, Vanderbilt University
>> [[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.
>>
>
>
> -----
> Frank Harrell
> Department of Biostatistics, Vanderbilt University
> --
> View this message in context: http://r.789695.n4.nabble.com/Labelling-all-variables-at-once-using-Hmisc-label-tp3745660p3751273.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> 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.
David Winsemius, MD
West Hartford, CT
Hi Frank, it's true to one of your reply to my previous post, can only be seen in Nabble. ----- Original Message ----- From: David Winsemius <dwinsemius at comcast.net> To: Frank Harrell <f.harrell at vanderbilt.edu> Cc: r-help at r-project.org Sent: Wednesday, August 17, 2011 3:08 PM Subject: Re: [R] Labelling all variables at once (using Hmisc label)
On Aug 17, 2011, at 5:49 PM, Frank Harrell wrote:
I'm puzzled.? I provided a solution that did not require looping. Frank
Hi Frank; Do you realize that some portions of your Nabble postings are not being communicated to the ordinary mail-clients? This code did not appear in my copy from Nabble. I didn't cut anything. This appears in Nabble when you look there:
d <- data.frame(a=1:2,b=3:4)
label(d, self=FALSE) <- c('A','B')
contents(d)
Data frame:d??? 2 observations and 2 variables Maximum # NAs:0 Labels Storage a A integer b B integer I observed and noted that was happening in a prior message. The missing formatted Nabble studd also comes across without linefeeds when pasted, so I added some of those back in. --David.
Monsieur Do wrote:
I did read the help page before posting, but didn't find the direct way...
My function here works fine. But just for learning purposes, I'd like to
be able to avoid the loop...
with.labels <- function(x, labels=NULL, csvfile=NULL) {
if(!is.null(csvfile)) labels <- read.csv(csvfile, sep="\t", header=F,
stringsAsFactors=F)[,1]
for(i in 1:length(x)) label(x[,i]) <- labels[i]
if(length(labels) != length(x)) cat("Warning: data and labels are not of
same length\n")
return(x)
}
Thanks
Message: 11 ? Date: Tue, 16 Aug 2011 04:22:07 -0700 (PDT) ? From:
Frank Harrell <f.harrell at vanderbilt.edu>
? To:
r-help at r-project.org
? Subject:
Re: [R] Labelling all variables at once (using Hmisc label)
? Message-ID:
<1313493727519-3746928.post at n4.nabble.com>
? Content-Type:
text/plain; charset=UTF-8
? Do
require(Hmisc); ?label to see the help file for label.? It will show you
? how to
do this:
? Monsieur
Do wrote:
? >
I have a dataset and a list of labels. I simply want
? > to
apply the labels to the variables, all at once. The only way I was able
? > to do
it was using a loop:
? > ? > for (i in 1:length(data)) label(data[,i]) <-data.labels[i] ? > ? > I'd like to find the non-loop way to do it, using
? >
apply or the like... Any help appreciated.
? > ? -----
? Frank
Harrell
? Department
of Biostatistics, Vanderbilt University ??? [[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.
----- Frank Harrell Department of Biostatistics, Vanderbilt University -- View this message in context: http://r.789695.n4.nabble.com/Labelling-all-variables-at-once-using-Hmisc-label-tp3745660p3751273.html Sent from the R help mailing list archive at Nabble.com.
______________________________________________ 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.
David Winsemius, MD West Hartford, CT ______________________________________________ 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.