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.600e-04 seconds DSDP Set Data: 2.620e-04 seconds DSDP Process Data: 9.179e-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: 8.130e-04 seconds DSDP Preparation and Solve Time: 9.048e-04 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 1.1444e-05 0.90 Bound Y Cone 228 3.7193e-05 2.94 SDP Cone 228 2.4080e-04 19.02 Cone Setup 1&2 2 4.4823e-05 3.54 Cone Invert S 33 2.0504e-05 1.62 Cone RHS 25 2.5749e-05 2.03 Cone Compute Newton Eq. 8 3.9577e-05 3.13 Cone Max P Step Length 8 6.3658e-05 5.03 Cone Compute and Factor SP 8 6.9141e-06 0.55 Cone Max D Step Length 33 5.8889e-05 4.65 Cone Compute and Factor S 46 4.0531e-05 3.20 Cone Potential 45 3.7909e-05 2.99 Cone View 9 2.1458e-06 0.17 Cone Compute X 1 7.8678e-06 0.62 SDP Dot 38 1.0967e-05 0.87 SDP SSolve 13 9.5367e-07 0.08 SDP X+vv' 13 8.1062e-06 0.64 Factor Newton Eq. 8 1.1921e-06 0.09 Solve Newton Eq. 46 5.0068e-06 0.40 Primal Step 8 8.7738e-05 6.93 Dual Step 8 3.5763e-05 2.82 Corrector Step 25 1.7238e-04 13.62 CG Solve 42 2.2888e-05 1.81 DSDP Solve 1 7.5102e-04 59.32 -------------------------------------------------------------------------- --- DSDP Finished --- > > stopifnot(all.equal(result$y,c(1),tolerance=1e-05)) > > proc.time() user system elapsed 0.18 0.06 0.23