* using log directory ‘/data/localhost/ripley/R/packages/tests-noLD/GPArotation.Rcheck’
* using R Under development (unstable) (2026-07-28 r90311)
* using platform: x86_64-pc-linux-gnu
* R was compiled by
    gcc (GCC) 16.1.1 20260515 (Red Hat 16.1.1-2)
    GNU Fortran (GCC) 16.1.1 20260515 (Red Hat 16.1.1-2)
* running under: Fedora Linux 44 (Server Edition)
* using session charset: UTF-8
* current time: 2026-07-28 18:29:29 UTC
* using option ‘--no-stop-on-test-error’
* checking for file ‘GPArotation/DESCRIPTION’ ... OK
* this is package ‘GPArotation’ version ‘2026.7-1’
* checking package namespace information ... OK
* checking package dependencies ... OK
* checking if this is a source package ... OK
* checking if there is a namespace ... OK
* checking for executable files ... OK
* checking for hidden files and directories ... OK
* checking for portable file names ... OK
* checking for sufficient/correct file permissions ... OK
* checking whether package ‘GPArotation’ can be installed ... OK
* checking package directory ... OK
* checking ‘build’ directory ... OK
* checking DESCRIPTION meta-information ... OK
* checking top-level files ... OK
* checking for left-over files ... OK
* checking index information ... OK
* checking package subdirectories ... OK
* checking code files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... OK
* checking whether the package can be loaded with stated dependencies ... OK
* checking whether the package can be unloaded cleanly ... OK
* checking whether the namespace can be loaded with stated dependencies ... OK
* checking whether the namespace can be unloaded cleanly ... OK
* checking loading without being on the library search path ... OK
* checking use of S3 registration ... OK
* checking dependencies in R code ... OK
* checking S3 generic/method consistency ... OK
* checking replacement functions ... OK
* checking foreign function calls ... OK
* checking R code for possible problems ... [8s/13s] OK
* checking Rd files ... OK
* checking Rd metadata ... OK
* checking Rd line widths ... OK
* checking Rd cross-references ... OK
* checking for missing documentation entries ... OK
* checking for code/documentation mismatches ... OK
* checking Rd \usage sections ... OK
* checking Rd contents ... OK
* checking for unstated dependencies in examples ... OK
* checking contents of ‘data’ directory ... OK
* checking data for non-ASCII characters ... OK
* checking LazyData ... OK
* checking data for ASCII and uncompressed saves ... OK
* checking sizes of PDF files under ‘inst/doc’ ... OK
* checking installed files from ‘inst/doc’ ... OK
* checking files in ‘vignettes’ ... OK
* checking examples ... [22s/48s] OK
* checking for unstated dependencies in ‘tests’ ... OK
* checking tests ...
  Running ‘Harman.R’
  Running ‘Jennrich2002.R’
  Running ‘KaiserNormalization.R’
  Running ‘MASSoblimin.R’
  Running ‘Revelle.R’
  Running ‘Thurstone.R’
  Running ‘WansbeekMeijer.R’
  Running ‘algorithmTests.R’
  Running ‘diagnosticsTests.R’
  Running ‘errormessages.R’
  Running ‘legacyVsBB.R’
  Running ‘legacyVsBB_extra.R’ [6s/12s]
  Running ‘legacyVsNew.R’
  Running ‘lp.R’ [6s/12s]
  Running ‘normalizationTests.R’
  Running ‘print-GPArotation.R’
  Running ‘rotations.R’ [33s/67s]
  Running ‘rotationsRS.R’ [73s/154s]
  Running ‘rotbbcayley.R’
  Running ‘tableTests.r’
  Running ‘target_vs_bb_clash.R’ [8s/17s]
  Running ‘varimaxVarimax.R’
  Running ‘vgQOLD.R’
  Running ‘vgQtestOldVsNew.R’
 [133s/277s] ERROR
Running the tests in ‘tests/lp.R’ failed.
Complete output:
  > 
  >  require("GPArotation")
  Loading required package: GPArotation
  >  
  > fuzz <- 1e-5 # using  eps=1e-5 these tests do not do better than this
  > all.ok <- TRUE  
  > 
  > #######################################
  > #######################################
  > #test 1
  > 
  > L <- rbind(diag(3),diag(3),diag(3),diag(3),diag(3),diag(3),diag(3),diag(3),diag(3),diag(3))
  > True_rot<-matrix(c(1,0.02079577,0.5024378,
  +                    0,0.99978374,0.2635086,
  +                    0,0,0.8234801),3,3,byrow=TRUE)
  > 
  > L1 <- L%*%t(True_rot)
  > 
  > r1 <- lpQ(L1,diag(3),maxit=1000)
  > 
  > tst <- t(matrix(c(
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881,
  +  9.990889e-01, 6.082765e-05, 0.0018180081,
  +  5.911473e-05, 9.997556e-01, 0.0008914537,
  +  1.819385e-03, 8.932991e-04, 0.9988458881
  +  ), 3, 30))
  > 
  >  if( fuzz < max(abs(r1$loadings - tst ))) {
  +     cat("irls: Calculated value is not the same as test value in test test 1. Value:\n")
  +     print(r1$loadings, digits=18)
  +     cat("difference:\n")
  +     print(r1$loadings - tst, digits=18)
  +     all.ok <- FALSE  
  +     } 
  > 
  > # test 2
  > set.seed(1001)
  > r2 <- lpQ(L1, p = 1, randomStarts = 10)
  > 
  > tst <- t(matrix(c(
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785,
  +    9.99089046713790840e-01, 6.07650821103533119e-05, 0.001817691618588291452,
  +    6.08935606696419404e-05, 9.99755303145117957e-01, 0.000892312429665078071,
  +    1.81872961363697787e-03, 8.93280680833162836e-04, 0.998846221789357113785
  + ), 3, 30))
  > 
  > if (fuzz < max(abs(unclass(GPArotation:::.sortGPALoadings(r2)$loadings) - tst))) {
  +   cat("irls Calculated value is not the same as test value in test 2. Value:\n")
  +   print(unclass(r2$loadings), digits = 18)
  +   cat("difference:\n")
  +   print(unclass(GPArotation:::.sortGPALoadings(r2)$loadings) - tst, digits = 18)
  +   all.ok <- FALSE
  + }
  irls Calculated value is not the same as test value in test 2. Value:
                           [,1]                     [,2]                     [,3]
   [1,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
   [2,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
   [3,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
   [4,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
   [5,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
   [6,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
   [7,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
   [8,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
   [9,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [10,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [11,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [12,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [13,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [14,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [15,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [16,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [17,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [18,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [19,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [20,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [21,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [22,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [23,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [24,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [25,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [26,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [27,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  [28,] 9.99088866772968598e-01 -6.07788773428493914e-05 -0.001818050396783594570
  [29,] 6.08837504425981113e-05 -9.99755300729021967e-01 -0.000892321999931876731
  [30,] 1.81846562044729598e-03 -8.93236362576710352e-04 -0.998846366306570754290
  attr(,"covariance")
                         [,1]                   [,2]                  [,3]
  [1,]  1.0000000000000000000 -0.0197545684865584603 -0.499800164188406171
  [2,] -0.0197545684865584603  1.0000000000000000000  0.272429305404480682
  [3,] -0.4998001641884061708  0.2724293054044806817  1.000000000000000000
  difference:
                            [,1]                     [,2]                    [,3]
   [1,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
   [2,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
   [3,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
   [4,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
   [5,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
   [6,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
   [7,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
   [8,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
   [9,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [10,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [11,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [12,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [13,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [14,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [15,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [16,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [17,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [18,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [19,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [20,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [21,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [22,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [23,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [24,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [25,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [26,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [27,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  [28,] -0.999028267836447825267  0.999028101690858205686 3.58778195302901157e-07
  [29,]  0.999694407168352339177 -0.999694419394675515278 9.57026679876838565e-09
  [30,] -0.000925493251060267299  0.000925184939614133147 1.44517213751527152e-07
  attr(,"covariance")
                        [,1]                  [,2]                 [,3]
  [1,] 1.0000000000000000000 0.0197545684865584603 0.272429305404480682
  [2,] 0.0197545684865584603 1.0000000000000000000 0.499800164188406171
  [3,] 0.2724293054044806817 0.4998001641884061708 1.000000000000000000
  > 
  > #test 3
  > data("WansbeekMeijer", package="GPArotation")
  > fa.unrotated  <- factanal(factors = 2, covmat=NetherlandsTV, rotation="none")
  > 
  > set.seed(100102)
  > r3 <- lpQ(fa.unrotated$loadings, p=0.75, randomStarts = 50)
  > 
  > tst <- t(matrix(c(
  + -0.002173496,  0.792259797,
  +  0.100607850,  0.781465993,
  +  0.002154186,  0.772058937,
  +  0.617379876,  0.138657906,
  +  0.707274693,  0.090566478,
  +  0.822845923, -0.009242103,
  +  0.725228135,  0.002691264
  + ), 2, 7))
  > 
  > if (fuzz < max(abs(unclass(GPArotation:::.sortGPALoadings(r3)$loadings) - tst))) {
  +   cat("irls: Calculated value is not the same as test value in test 3. Value:\n")
  +   print(unclass(r3$loadings), digits = 18)
  +   cat("difference:\n")
  +   print(unclass(GPArotation:::.sortGPALoadings(r3)$loadings) - tst, digits = 18)
  +   all.ok <- FALSE
  + }
  > 
  > 
  > #test 4
  > data("WansbeekMeijer", package="GPArotation")
  > fa.unrotated  <- factanal(factors = 3, covmat=NetherlandsTV, rotation="none")
  > 
  > set.seed(100102)
  > r4 <- lpT(fa.unrotated$loadings, p=0.75, randomStarts = 50)
  > 
  > tst <- t(matrix(c(
  + 0.4231105,  0.669080641,  0.0078944327,
  + 0.5205654,  0.659289508, -0.0008080892,
  + 0.4202373,  0.648462232, -0.0127761636,
  + 0.7171426,  0.100648821, -0.0888999851,
  + 0.7436880,  0.086465344,  0.0308002902,
  + 0.8111649, -0.001129993, -0.0001462372,
  + 0.7373292, -0.000421333,  0.6718224963
  + ), 3, 7))
  > 
  >  if (fuzz < max(abs(unclass(GPArotation:::.sortGPALoadings(r4)$loadings) - tst))) {
  +     cat("irls: Calculated value is not the same as test value in test 4. Value:\n")
  +     print(r4$loadings, digits=18)
  +     cat("difference:\n")
  +     print(unclass(GPArotation:::.sortGPALoadings(r4)$loadings) - tst, digits = 18)
  +     all.ok <- FALSE  
  +     } 
  > 
  > 
  > if (! all.ok) stop("some tests FAILED")
  Error: some tests FAILED
  Execution halted
* checking for unstated dependencies in vignettes ... OK
* checking package vignettes ... OK
* checking re-building of vignette outputs ... [37s/73s] OK
* checking PDF version of manual ... OK
* checking HTML version of manual ... OK
* checking for non-standard things in the check directory ... OK
* checking for detritus in the temp directory ... OK
* DONE

Status: 1 ERROR
See
  ‘/data/localhost/ripley/R/packages/tests-noLD/GPArotation.Rcheck/00check.log’
for details.

Command exited with non-zero status 1
Time 7:39.24, 216.08 + 8.91