Thanks. On 2021/5/16 上午 11:52, Robert Knight wrote: > Hi Steven, > > You make great sense wanting to have labels for your variables. When > in RStudio, the little arrow beside "mydata" in the Environment tab > can be clicked and you see all the variables there. And so you would > like to see a description under the variable names. Here is one way > to accomplish that. The following is not pseudocode, it's the actual > code you should use. > > Step 1, create a function that applies an attribute called > "description" to a variable. > desc <- function(obj) attr(obj, "description") > Step 2, use attribute to apply the description > attr(mydata$invpc, "description") <- "Per capita inventory" > Step 3, Now you can either click the arrow beside "mydata" on the > environment tab and see that written description with the word > "description" in quotes. You can also type > desc(mydata$invpc) > And that will provide you the associated description in text form. > > > Robert D. Knight, MBA > > Developer of Meal Plan and Grocery List maker for Android and iOS. > https://play.google.com/store/apps/details?id=io.robertknight.MPGL > <https://play.google.com/store/apps/details?id=io.robertknight.MPGL> > > > > > > > On Wed, May 12, 2021 at 9:49 PM Steven Yen <st...@ntu.edu.tw > <mailto:st...@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@r-project.org <mailto:R-help@r-project.org> mailing list -- > To UNSUBSCRIBE and more, see > https://stat.ethz.ch/mailman/listinfo/r-help > <https://stat.ethz.ch/mailman/listinfo/r-help> > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html > <http://www.R-project.org/posting-guide.html> > and provide commented, minimal, self-contained, reproducible code. >
[[alternative HTML version deleted]] ______________________________________________ R-help@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.