R Under development (unstable) (2025-06-06 r88283 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. > # Test OPTIONS input (Unit test) > # This test example is provided by Hongbo Dong. > > library(Rdsdp) > > K=c() > K$l=0 > K$s=c(3) > C = matrix(c(1,0,0,0,1,0,0,0,1),1,9, byrow=TRUE) > A = matrix(c(1,0,0,0,0,0,0,0,0),1,9,byrow=TRUE) > b <- c(1); > > OPTIONS=c() > OPTIONS$print=1 > OPTIONS$logsummary=1 > OPTIONS$outputstats=1 > > result = dsdp(A,b,C,K,OPTIONS) Variables 1 Matrix Blocks: 1, Total Number of Constraints: 3 Nonzeros in Constraints: 4 Read Data File into Buffer: 1.659e-04 seconds DSDP Set Data: 2.489e-04 seconds DSDP Process Data: 8.202e-05 seconds Data Norms: C: 1.73e+00, A: 1.00e+00, b: 1.00e+00 Scale C: 8.16e-01 Potential Parameter: 5.00 Reapply Schur matrix: 4 Iter PP Objective DD Objective PInfeas DInfeas Nu StepLength Pnrm --------------------------------------------------------------------------------------- 0 1.00000000e+10 -2.24143868e+09 2.0e+00 2.2e+01 2.2e+09 0.00 0.00 0.00 1 4.55046327e+09 -3.18437699e+01 3.7e-04 0.0e+00 9.4e+06 1.00 1.00 41.14 2 3.75421637e+07 -1.52960686e+01 1.2e-05 0.0e+00 1.2e+01 1.00 1.00 0.81 3 5.09706782e+01 7.57544814e-01 2.6e-12 0.0e+00 1.9e-01 1.00 1.00 28.55 4 1.74298889e+00 9.96392718e-01 3.1e-15 0.0e+00 2.8e-03 1.00 1.00 28.55 5 1.01105429e+00 9.99946330e-01 5.5e-17 0.0e+00 4.1e-05 1.00 1.00 28.55 6 1.00016447e+00 9.99999201e-01 8.2e-19 0.0e+00 6.1e-07 1.00 1.00 28.55 7 1.00000245e+00 9.99999988e-01 1.2e-20 0.0e+00 9.1e-09 1.00 1.00 28.55 8 1.00000004e+00 9.99999999e-01 1.8e-22 0.0e+00 1.9e-09 1.00 0.18 5.15 DSDP Converged. P Objective : 1.00000002e+00 DSDP Solution: 9.99999999e-01 DSDP Solve Time: 9.310e-04 seconds DSDP Preparation and Solve Time: 1.013e-03 seconds P Infeasible: 1.00e-12 D Infeasible: 0.00e+00 Minimal P Eigenvalue: 0.00e+00 Minimal D Eigenvalue: 0.00 Relative P - D Objective values: 6.27e-09 Relative X Dot S: 1.00e-08 Max Y: 9.99999999e-01, Bounded by 1.0e+07 Trace X: 1.00000002e+00, Bounded by Penalty Parameter: 1.0e+08 PERFORMANCE SUMMARY Event Calls Time(s) Time(%) -------------------------------------------------------------------------- R Cone 228 2.5511e-05 1.83 Bound Y Cone 228 3.1233e-05 2.24 SDP Cone 228 2.2817e-04 16.38 Cone Setup 1&2 2 3.6955e-05 2.65 Cone Invert S 33 2.0027e-05 1.44 Cone RHS 25 3.1233e-05 2.24 Cone Compute Newton Eq. 8 4.0054e-05 2.88 Cone Max P Step Length 8 5.0783e-05 3.65 Cone Compute and Factor SP 8 6.6757e-06 0.48 Cone Max D Step Length 33 7.4625e-05 5.36 Cone Compute and Factor S 46 4.1246e-05 2.96 Cone Potential 45 4.5776e-05 3.29 Cone View 9 5.2452e-06 0.38 Cone Compute X 1 9.0599e-06 0.65 SDP Dot 38 4.7684e-06 0.34 SDP SSolve 13 2.1458e-06 0.15 SDP X+vv' 13 1.1206e-05 0.80 Factor Newton Eq. 8 9.5367e-07 0.07 Solve Newton Eq. 46 4.7684e-06 0.34 Primal Step 8 7.5817e-05 5.44 Dual Step 8 4.6253e-05 3.32 Corrector Step 25 2.1100e-04 15.15 CG Solve 42 2.5749e-05 1.85 DSDP Solve 1 8.6689e-04 62.23 -------------------------------------------------------------------------- --- DSDP Finished --- > > stopifnot(all.equal(result$y,c(1),tolerance=1e-05)) > > proc.time() user system elapsed 0.23 0.04 0.26