get_label | R Documentation |
Get label if wanted and available, or default (name) otherwise
get_label(x, default = names(x), object = FALSE, simplify = TRUE)
x |
labelled object. If |
default |
value returned if there is no label. Default to |
object |
if |
simplify |
if |
A character vector if simplify==TRUE
, a list otherwise
Dan Chaltiel
set_label()
, import_labels()
, remove_label()
, Hmisc::label()
, expss::var_lab()
xx=mtcars2 %>%
set_label("The mtcars2 dataset", object=TRUE)
xx$cyl=remove_label(xx$cyl)
#vectors
get_label(xx$mpg) #label="Miles/(US) gallon"
get_label(xx$cyl) #default to NULL (since names(xx$cyl)==NULL)
get_label(xx$cyl, default="Default value")
#data.frames
get_label(xx)
get_label(xx, object=TRUE)
data.frame(name=names(xx), label=get_label(xx, default=NA)) #cyl is NA
#lists
get_label(list(xx$cyl, xx$mpg)) #cyl is NA
get_label(list(foo=xx$cyl, bar=xx$mpg)) #default to names
get_label(list(foo=xx$cyl, bar=xx$mpg), default="Default value")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.