R Under development (unstable) (2025-08-29 r88740 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2025 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> date()
[1] "Sat Aug 30 15:15:55 2025"
> library(nlmeU)
> data(armd)
> library(nlme)
> lm3.form <- formula(visual ~ visual0 + time + treat.f)
> fm16.5ml <- lme(lm3.form, random = list(subject = pdDiag(~time)) ,
+                weights = varPower(form = ~ time),  data = armd,
+                method="ML")
> 
> 
> df1 <- subset(armd, subject %in% "1") # Data for subject "1"
> # detach(package:nlme)
> 
> 
> logLik1(fm16.5ml, df1)
[1] -6.657611
> 
> 
> packageVersion("nlme")
[1] '3.1.168'
> sessionInfo()
R Under development (unstable) (2025-08-29 r88740 ucrt)
Platform: x86_64-w64-mingw32/x64
Running under: Windows Server 2022 x64 (build 20348)

Matrix products: default
  LAPACK version 3.12.1

locale:
[1] LC_COLLATE=C                 LC_CTYPE=German_Germany.utf8
[3] LC_MONETARY=C                LC_NUMERIC=C                
[5] LC_TIME=C                   

time zone: Europe/Berlin
tzcode source: internal

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] nlme_3.1-168 nlmeU_0.71.7

loaded via a namespace (and not attached):
[1] compiler_4.6.0 tools_4.6.0    grid_4.6.0     lattice_0.22-7
> # detach(package:nlmeU)
> 
> proc.time()
   user  system elapsed 
   0.37    0.09    0.40