# NOT RUN {
if(.Platform$OS.type == "windows") withAutoprint({
## only in HLM if set in an admin-mode install.
try(readRegistry("SOFTWARE\\R-core", maxdepth = 3))
gmt <- file.path("SOFTWARE", "Microsoft", "Windows NT",
"CurrentVersion", "Time Zones",
"GMT Standard Time", fsep = "\\")
readRegistry(gmt, "HLM")
})
# }
# NOT RUN {
<!-- %donttest -->
# }
# NOT RUN {
## on a 64-bit R need this to find 32-bit JAGS
readRegistry("SOFTWARE\\JAGS", maxdepth = 3, view = "32")
## See if there is a 64-bit user install
readRegistry("SOFTWARE\\R-core\\R64", "HCU", maxdepth = 2)
# }
Run the code above in your browser using DataLab