Hi Steven,
I just happened to scan Petr's message to you and wondered if you were
looking for something related to the "describe" function in the
prettyR package (and a few others). For instance, if you do this:
library(prettyR)
describe(mtcars)
you get this:
Description of mtcars
Numeric
mean median var sd valid.n
mpg 20.09 19.20 36.32 6.03 32
cyl 6.19 6.00 3.19 1.79 32
disp 230.72 196.30 15360.80 123.94 32
hp 146.69 123.00 4700.87 68.56 32
drat 3.60 3.70 0.29 0.53 32
wt 3.22 3.33 0.96 0.98 32
qsec 17.85 17.71 3.19 1.79 32
vs 0.44 0.00 0.25 0.50 32
am 0.41 0.00 0.25 0.50 32
gear 3.69 4.00 0.54 0.74 32
carb 2.81 2.00 2.61 1.62 32
However, you can call almost any summary function as an argument to
describe. Suppose I wrote a function "fackey" that produced this
output on a factor variable "city":
fackey(city)
label numeric count
New York 10 30
London 15 23
Paris 16 22
Rome 20 25
So if you ran "describe" on your data frame, you would get a list of
summary data frames that could be saved with the data frame in an
.Rdata file. Is this what you are looking for?
Jim
On Fri, May 14, 2021 at 4:59 PM PIKAL Petr <petr.pikal at precheza.cz>
wrote:>
> Hallo Steven
>
> You probably need to be more specific what is your intention. I still
wonder what is the real problem you want to solve.
>
> You loaded binary file and it resulted to 2 data frames. So far so good.
But now I am lost.
>
> You want to merge info from data frame "desc" to data frame
"data"? You can use attr.
> You want to make binary file which behaves like the one you get? Use
save/load.
> You want to do something different? So please explain what exactly.
>
> Cheers
> Petr
>
>
> > -----Original Message-----
> > From: Steven Yen <styen at ntu.edu.tw>
> > Sent: Thursday, May 13, 2021 5:53 PM
> > To: PIKAL Petr <petr.pikal at precheza.cz>
> > Subject: Re: [R] Variable labels
> >
> > Petr
> >
> > Those attachments (1.jpg, 2.jpg) I sent earlier were just screen
captures
> > (with a third-party program) of what I saw in the Environment pane
right
> > after loading the data. Sorry I cannot explain my questions well
enough.
> >
> > All I was showing you was, right after loading the binary data file, I
saw two
> > data frames---data which contain the data, and desc which contains
> > definitions of all variables (as shown in 2.jpg). This is a data file
from the
> > publisher and I wanted to know what it takes to create a binary data
files
> > along with definitions of variables, both in the environment.
> >
> > Steven
> >
> > On 2021/5/13 ?? 09:51, PIKAL Petr wrote:
> > > Hi Steven
> > >
> > > I probably do not understand your question correctly. In 1 you
show two
> > objects "data" 14x42 data frame and "desc" which
is 2x14 data frame, both
> > residing in global environment.
> > >
> > > In 2 you show contents of data frame desc where variable are
probably
> > variable names which are also in data object.
> > >
> > > names(data)
> > >
> > > and label which is some more elaborate description of the
variable.
> > >
> > > If you want to move this label into your data object you probably
> > > could use attr
> > >
> > > attr(data, "label") <- desc$label
> > >
> > > If the order of "variable" is same as the order of data
columns.
> > >
> > > I do not understand what do you mean by - how to get that
"desc" in
> > > there in the environment? It is already part of global
environment. You
> > want to create some new environment and move you desc there?
> > >
> > > Beside, your images are not familiar to me, this is plain R or
some kind of
> > special GUI like R studio?
> > >
> > > Cheers
> > > Petr
> > >
> > >> -----Original Message-----
> > >> From: Steven Yen <styen at ntu.edu.tw>
> > >> Sent: Thursday, May 13, 2021 1:37 PM
> > >> To: PIKAL Petr <petr.pikal at precheza.cz>
> > >> Subject: Re: [R] Variable labels
> > >>
> > >> Petr
> > >>
> > >> Thanks. I am sending this to you privately as I am sending
attachment.
> > >>
> > >> 1. I load the binary file and see the data frame and what
appears to
> > >> be description (desc) alongside it (1.jpg).
> > >>
> > >> 2. Expanding "desc", I get to read the
documentation (contents of desc).
> > >> (2.jpg).
> > >>
> > >> #2 is all I need. I do not need to do anything fancy with the
> > >> variable label. I just like my students to have a simple ways
of
> > >> learning the variables is the data file I provide to them.
> > >>
> > >> Again, my main question is, how to get that "desc"
in there in the
> > >> environment. Thanks.
> > >>
> > >> Steven
> > >>
> > >> On 2021/5/13 ?? 06:31, PIKAL Petr wrote:
> > >>> Hi.
> > >>>
> > >>> Maybe you could use attributes.
> > >>>
> > >>> dput(vec.m)
> > >>> structure(list(Group.1 = c(2003, 2021, 2003, 2021, 2003,
2021, 2003,
> > >>> 2021, 2003, 2021, 2003, 2021, 2003, 2021, 2003, 2021,
2003, 2021),
> > >>> variable = structure(c(1L, 1L, 2L, 2L, 3L, 3L, 4L, 4L,
5L, 5L, 6L,
> > >>> 6L, 7L, 7L, 8L, 8L, 9L, 9L), .Label = c("s6",
"s5", "s4", "s3",
> > >>> "s2", "s1.5", "s.7",
"s.5", "pod"), class = "factor"),
> > >>> value = c(3.29, 0.525, 5.01, 1.385, 16.38, 7.67,
5.535, 3.28,
> > >>> 25.49, 24.41, 10.285, 12.79, 8.905, 12.92, 1.68,
3.67, 2.595,
> > >>> 5.06)), row.names = c(NA, -18L), class =
"data.frame")
> > >>>
> > >>>> attr(vec.m, "some.kind.of.value") <-
c("some specialvector",
> > >>>> "another special vector", "just
ordinary vector")
> > >>> You can access them by attributes or attr.
> > >>>
> > >>> attributes(vec.m)
> > >>> $row.names
> > >>> [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
18
> > >>>
> > >>> $names
> > >>> [1] "Group.1" "variable"
"value"
> > >>>
> > >>> $class
> > >>> [1] "data.frame"
> > >>>
> > >>> $some.kind.of.value
> > >>> [1] "some specialvector" "another
special vector" "just ordinary
> > vector"
> > >>>
> > >>>> attr(vec.m, "some")
> > >>> [1] "some specialvector" "another
special vector" "just ordinary
> > vector"
> > >>> Cheers
> > >>> Petr
> > >>>
> > >>>> -----Original Message-----
> > >>>> From: R-help <r-help-bounces at r-project.org>
On Behalf Of Steven
> > Yen
> > >>>> Sent: Thursday, May 13, 2021 10:07 AM
> > >>>> To: Fredrik Karlsson <dargosch at gmail.com>
> > >>>> Cc: R-help Mailing List <r-help at
r-project.org>
> > >>>> Subject: Re: [R] Variable labels
> > >>>>
> > >>>> Thanks. What I need ?appears? simple. The .RData file
is provided
> > >>>> by a third party (likely converted from a different
data format
> > >>>> such as SAS in which variable labels (not value
labels) are
> > >>>> common). When I load the binary file, in the
?environment? I see,
> > >>>> as expected, a data frame showing how many
observations for how
> > >>>> many variables. In addition, there is also an item
(in the
> > >>>> environment) (say ?desc?) containing a list of
variable labels
> > >>>> (definitions). I simply like to know how to get
?desc? in the
> > >>>> environment?-it is a convenient way to show
definitions of all
> > >>>> variables when you send a binary data file to a third
party. Thank you.
> > >>>>
> > >>>>> On May 13, 2021, at 2:57 PM, Fredrik Karlsson
<dargosch at gmail.com>
> > >>>> wrote:
> > >>>>> Hi,
> > >>>>>
> > >>>>> I am sorry but I don't understand your
question, Generally,
> > >>>>> "clicking" is not
> > >>>> something you can assume to be implemented for
anything in R.
> > >>>>> However, if you read the manual for the package
> > >>>>>
> > >>>>> https://gdemin.github.io/expss/
> > >>>>>
> > >>>>> you get an example at the bottom where an
illustration of how the
> > >>>>> package
> > >>>> can be used to create Excel tables which would then
be easy to
> > >>>> interact with through clicking.
> > >>>>> Is that what you wanted?
> > >>>>>
> > >>>>> Fredrik
> > >>>>>
> > >>>>>> On Thu, May 13, 2021 at 4:49 AM Steven Yen
<styen at ntu.edu.tw>
> > >> wrote:
> > >>>>>> I insert variable with the expss function as
shown below. No
> > >>>>>> error message. My question is, how to save
the variable labels in
> > >>>>>> the data frame so that I can click to read
the labels. Thank you.
> > >>>>>>
> > >>>>>>
mydata<-read_excel("data/Excel/hseinv.xlsx",na=".")
> > >>>>>> library(expss)
> > >>>>>> mydata=apply_labels(mydata,
> > >>>>>> year
="1947-1988",
> > >>>>>> inv ="real
housing inv, millions $",
> > >>>>>> pop
="population, 1000s",
> > >>>>>> price ="housing
price index; 1982 = 1",
> > >>>>>> linv
="log(inv)",
> > >>>>>> lpop
="log(pop)",
> > >>>>>> lprice
="log(price)",
> > >>>>>> t ="time
trend: t=1,...,42",
> > >>>>>> invpc ="per
capita inv: inv/pop",
> > >>>>>> linvpc
="log(invpc)",
> > >>>>>>
lprice_1="lprice[_n-1]",
> > >>>>>>
linvpc_1="linvpc[_n-1]",
> > >>>>>> gprice ="lprice
- lprice_1",
> > >>>>>> ginvpc ="linvpc
- linvpc_1")
> > >>>>>>
> > >>>>>>
______________________________________________
> > >>>>>> R-help at r-project.org mailing list -- To
UNSUBSCRIBE and more, see
> > >>>>>> 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.
> > >>>>> --
> > >>>>> "Life is like a trumpet - if you don't
put anything into it, you
> > >>>>> don't get
> > >>>> anything out of it."
> > >>>>
> > >>>> [[alternative HTML version deleted]]
> > >>>>
> > >>>> ______________________________________________
> > >>>> R-help at r-project.org mailing list -- To
UNSUBSCRIBE and more, see
> > >>>> 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.
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> 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.
Thanks to all, for bearing with me.
Now I realize expss may not be what I need. I have now written a
self-runnable, replicable set of codes (listed below). Perhaps that
gives an idea of what I need. Question is, whethet this is the right way
to do this (to have a clickable object to learn about variable
definitions) or whether there are better ways. Thanks!
Steven
rm(list=ls())
n<-6
mydata<-data.frame(id=1:n,
?????????????????? age=floor(rnorm(n,25,10)),
?????????????????? yrmarry=floor(rnorm(n,5,2)))
var.labels<-c(id? = "Individual ID",
????????????? age = "Age in Years",
????????????? yrmarry = "Years of marriage")
definitions<-as.data.frame(var.labels) # declare definitions as a data frame
save.image("c:/temp/a/try1.RData")???? # save binary .RData file
rm(list=ls())????????????????????????? # clean environment
load("c:/temp/a/try1.RData") # now load .RData file and definitions
are
clickable
???????????????????????????? # all I need is for user to be able to click
???????????????????????????? # and read the variable definitions
On 2021/5/14 ?? 05:15, Jim Lemon wrote:> Hi Steven,
> I just happened to scan Petr's message to you and wondered if you were
> looking for something related to the "describe" function in the
> prettyR package (and a few others). For instance, if you do this:
>
> library(prettyR)
> describe(mtcars)
>
> you get this:
>
> Description of mtcars
>
> Numeric
> mean median var sd valid.n
> mpg 20.09 19.20 36.32 6.03 32
> cyl 6.19 6.00 3.19 1.79 32
> disp 230.72 196.30 15360.80 123.94 32
> hp 146.69 123.00 4700.87 68.56 32
> drat 3.60 3.70 0.29 0.53 32
> wt 3.22 3.33 0.96 0.98 32
> qsec 17.85 17.71 3.19 1.79 32
> vs 0.44 0.00 0.25 0.50 32
> am 0.41 0.00 0.25 0.50 32
> gear 3.69 4.00 0.54 0.74 32
> carb 2.81 2.00 2.61 1.62 32
>
> However, you can call almost any summary function as an argument to
> describe. Suppose I wrote a function "fackey" that produced this
> output on a factor variable "city":
>
> fackey(city)
>
> label numeric count
> New York 10 30
> London 15 23
> Paris 16 22
> Rome 20 25
>
> So if you ran "describe" on your data frame, you would get a list
of
> summary data frames that could be saved with the data frame in an
> .Rdata file. Is this what you are looking for?
>
> Jim
>
> On Fri, May 14, 2021 at 4:59 PM PIKAL Petr <petr.pikal at
precheza.cz> wrote:
>> Hallo Steven
>>
>> You probably need to be more specific what is your intention. I still
wonder what is the real problem you want to solve.
>>
>> You loaded binary file and it resulted to 2 data frames. So far so
good. But now I am lost.
>>
>> You want to merge info from data frame "desc" to data frame
"data"? You can use attr.
>> You want to make binary file which behaves like the one you get? Use
save/load.
>> You want to do something different? So please explain what exactly.
>>
>> Cheers
>> Petr
>>
>>
>>> -----Original Message-----
>>> From: Steven Yen <styen at ntu.edu.tw>
>>> Sent: Thursday, May 13, 2021 5:53 PM
>>> To: PIKAL Petr <petr.pikal at precheza.cz>
>>> Subject: Re: [R] Variable labels
>>>
>>> Petr
>>>
>>> Those attachments (1.jpg, 2.jpg) I sent earlier were just screen
captures
>>> (with a third-party program) of what I saw in the Environment pane
right
>>> after loading the data. Sorry I cannot explain my questions well
enough.
>>>
>>> All I was showing you was, right after loading the binary data
file, I saw two
>>> data frames---data which contain the data, and desc which contains
>>> definitions of all variables (as shown in 2.jpg). This is a data
file from the
>>> publisher and I wanted to know what it takes to create a binary
data files
>>> along with definitions of variables, both in the environment.
>>>
>>> Steven
>>>
>>> On 2021/5/13 ?? 09:51, PIKAL Petr wrote:
>>>> Hi Steven
>>>>
>>>> I probably do not understand your question correctly. In 1 you
show two
>>> objects "data" 14x42 data frame and "desc"
which is 2x14 data frame, both
>>> residing in global environment.
>>>> In 2 you show contents of data frame desc where variable are
probably
>>> variable names which are also in data object.
>>>> names(data)
>>>>
>>>> and label which is some more elaborate description of the
variable.
>>>>
>>>> If you want to move this label into your data object you
probably
>>>> could use attr
>>>>
>>>> attr(data, "label") <- desc$label
>>>>
>>>> If the order of "variable" is same as the order of
data columns.
>>>>
>>>> I do not understand what do you mean by - how to get that
"desc" in
>>>> there in the environment? It is already part of global
environment. You
>>> want to create some new environment and move you desc there?
>>>> Beside, your images are not familiar to me, this is plain R or
some kind of
>>> special GUI like R studio?
>>>> Cheers
>>>> Petr
>>>>
>>>>> -----Original Message-----
>>>>> From: Steven Yen <styen at ntu.edu.tw>
>>>>> Sent: Thursday, May 13, 2021 1:37 PM
>>>>> To: PIKAL Petr <petr.pikal at precheza.cz>
>>>>> Subject: Re: [R] Variable labels
>>>>>
>>>>> Petr
>>>>>
>>>>> Thanks. I am sending this to you privately as I am sending
attachment.
>>>>>
>>>>> 1. I load the binary file and see the data frame and what
appears to
>>>>> be description (desc) alongside it (1.jpg).
>>>>>
>>>>> 2. Expanding "desc", I get to read the
documentation (contents of desc).
>>>>> (2.jpg).
>>>>>
>>>>> #2 is all I need. I do not need to do anything fancy with
the
>>>>> variable label. I just like my students to have a simple
ways of
>>>>> learning the variables is the data file I provide to them.
>>>>>
>>>>> Again, my main question is, how to get that
"desc" in there in the
>>>>> environment. Thanks.
>>>>>
>>>>> Steven
>>>>>
>>>>> On 2021/5/13 ?? 06:31, PIKAL Petr wrote:
>>>>>> Hi.
>>>>>>
>>>>>> Maybe you could use attributes.
>>>>>>
>>>>>> dput(vec.m)
>>>>>> structure(list(Group.1 = c(2003, 2021, 2003, 2021,
2003, 2021, 2003,
>>>>>> 2021, 2003, 2021, 2003, 2021, 2003, 2021, 2003, 2021,
2003, 2021),
>>>>>> variable = structure(c(1L, 1L, 2L, 2L, 3L, 3L, 4L, 4L,
5L, 5L, 6L,
>>>>>> 6L, 7L, 7L, 8L, 8L, 9L, 9L), .Label = c("s6",
"s5", "s4", "s3",
>>>>>> "s2", "s1.5", "s.7",
"s.5", "pod"), class = "factor"),
>>>>>> value = c(3.29, 0.525, 5.01, 1.385, 16.38, 7.67,
5.535, 3.28,
>>>>>> 25.49, 24.41, 10.285, 12.79, 8.905, 12.92, 1.68,
3.67, 2.595,
>>>>>> 5.06)), row.names = c(NA, -18L), class =
"data.frame")
>>>>>>
>>>>>>> attr(vec.m, "some.kind.of.value") <-
c("some specialvector",
>>>>>>> "another special vector", "just
ordinary vector")
>>>>>> You can access them by attributes or attr.
>>>>>>
>>>>>> attributes(vec.m)
>>>>>> $row.names
>>>>>> [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
17 18
>>>>>>
>>>>>> $names
>>>>>> [1] "Group.1" "variable"
"value"
>>>>>>
>>>>>> $class
>>>>>> [1] "data.frame"
>>>>>>
>>>>>> $some.kind.of.value
>>>>>> [1] "some specialvector" "another
special vector" "just ordinary
>>> vector"
>>>>>>> attr(vec.m, "some")
>>>>>> [1] "some specialvector" "another
special vector" "just ordinary
>>> vector"
>>>>>> Cheers
>>>>>> Petr
>>>>>>
>>>>>>> -----Original Message-----
>>>>>>> From: R-help <r-help-bounces at
r-project.org> On Behalf Of Steven
>>> Yen
>>>>>>> Sent: Thursday, May 13, 2021 10:07 AM
>>>>>>> To: Fredrik Karlsson <dargosch at gmail.com>
>>>>>>> Cc: R-help Mailing List <r-help at
r-project.org>
>>>>>>> Subject: Re: [R] Variable labels
>>>>>>>
>>>>>>> Thanks. What I need ?appears? simple. The .RData
file is provided
>>>>>>> by a third party (likely converted from a different
data format
>>>>>>> such as SAS in which variable labels (not value
labels) are
>>>>>>> common). When I load the binary file, in the
?environment? I see,
>>>>>>> as expected, a data frame showing how many
observations for how
>>>>>>> many variables. In addition, there is also an item
(in the
>>>>>>> environment) (say ?desc?) containing a list of
variable labels
>>>>>>> (definitions). I simply like to know how to get
?desc? in the
>>>>>>> environment?-it is a convenient way to show
definitions of all
>>>>>>> variables when you send a binary data file to a
third party. Thank you.
>>>>>>>
>>>>>>>> On May 13, 2021, at 2:57 PM, Fredrik Karlsson
<dargosch at gmail.com>
>>>>>>> wrote:
>>>>>>>> Hi,
>>>>>>>>
>>>>>>>> I am sorry but I don't understand your
question, Generally,
>>>>>>>> "clicking" is not
>>>>>>> something you can assume to be implemented for
anything in R.
>>>>>>>> However, if you read the manual for the package
>>>>>>>>
>>>>>>>> https://gdemin.github.io/expss/
>>>>>>>>
>>>>>>>> you get an example at the bottom where an
illustration of how the
>>>>>>>> package
>>>>>>> can be used to create Excel tables which would then
be easy to
>>>>>>> interact with through clicking.
>>>>>>>> Is that what you wanted?
>>>>>>>>
>>>>>>>> Fredrik
>>>>>>>>
>>>>>>>>> On Thu, May 13, 2021 at 4:49 AM Steven Yen
<styen at ntu.edu.tw>
>>>>> wrote:
>>>>>>>>> I insert variable with the expss function
as shown below. No
>>>>>>>>> error message. My question is, how to save
the variable labels in
>>>>>>>>> the data frame so that I can click to read
the labels. Thank you.
>>>>>>>>>
>>>>>>>>>
mydata<-read_excel("data/Excel/hseinv.xlsx",na=".")
>>>>>>>>> library(expss)
>>>>>>>>> mydata=apply_labels(mydata,
>>>>>>>>> year
="1947-1988",
>>>>>>>>> inv ="real
housing inv, millions $",
>>>>>>>>> pop
="population, 1000s",
>>>>>>>>> price
="housing price index; 1982 = 1",
>>>>>>>>> linv
="log(inv)",
>>>>>>>>> lpop
="log(pop)",
>>>>>>>>> lprice
="log(price)",
>>>>>>>>> t ="time
trend: t=1,...,42",
>>>>>>>>> invpc ="per
capita inv: inv/pop",
>>>>>>>>> linvpc
="log(invpc)",
>>>>>>>>>
lprice_1="lprice[_n-1]",
>>>>>>>>>
linvpc_1="linvpc[_n-1]",
>>>>>>>>> gprice
="lprice - lprice_1",
>>>>>>>>> ginvpc
="linvpc - linvpc_1")
>>>>>>>>>
>>>>>>>>>
______________________________________________
>>>>>>>>> R-help at r-project.org mailing list -- To
UNSUBSCRIBE and more, see
>>>>>>>>>
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.
>>>>>>>> --
>>>>>>>> "Life is like a trumpet - if you don't
put anything into it, you
>>>>>>>> don't get
>>>>>>> anything out of it."
>>>>>>>
>>>>>>> [[alternative HTML version deleted]]
>>>>>>>
>>>>>>> ______________________________________________
>>>>>>> R-help at r-project.org mailing list -- To
UNSUBSCRIBE and more, see
>>>>>>> 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.
>> ______________________________________________
>> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
>> 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.