# NOT RUN {
# the speed of light
syms$c0
# use the constants in a local environment
with(syms, c0)
# attach only Planck-related constants
(lkp <- lookup("planck", ignore.case=TRUE))
idx <- as.integer(rownames(lkp))
attach(syms[idx])
h
plkl
# the same with uncertainty
detach(syms[idx])
attach(syms_with_errors[idx])
h
plkl
# the same with units
detach(syms_with_errors[idx])
attach(syms_with_units[idx])
h
plkl
# the same with everything
detach(syms_with_units[idx])
attach(syms_with_quantities[idx])
h
plkl
# }
Run the code above in your browser using DataLab