[Distr-commits] r602 - in branches/distr-2.2/pkg/distr: R inst/doc

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Tue Oct 6 15:04:28 CEST 2009


Author: ruckdeschel
Date: 2009-10-06 15:04:28 +0200 (Tue, 06 Oct 2009)
New Revision: 602

Modified:
   branches/distr-2.2/pkg/distr/R/internals-qqplot.R
   branches/distr-2.2/pkg/distr/R/sqrt.R
   branches/distr-2.2/pkg/distr/inst/doc/Rplots.pdf
Log:
+ distr: forgot to delete some new arguments deleteItemsMCL
+ distr: embarrassing bug (for dim=1) in sqrt-method for PosSemDefSymmMatrix

Modified: branches/distr-2.2/pkg/distr/R/internals-qqplot.R
===================================================================
--- branches/distr-2.2/pkg/distr/R/internals-qqplot.R	2009-10-06 12:16:11 UTC (rev 601)
+++ branches/distr-2.2/pkg/distr/R/internals-qqplot.R	2009-10-06 13:04:28 UTC (rev 602)
@@ -291,7 +291,7 @@
     mcl$col.lbl <- mcl$cex.lbl  <- mcl$adj.lbl <- NULL
     mcl$exp.cex2.pch <- mcl$exp.cex2.lbl <- NULL
     mcl$exp.fadcol.pch <- mcl$exp.fadcol.lbl <- NULL
-    mcl$nosym.pCI <- NULL
+    mcl$nosym.pCI <- mcl$n.CI <- mcl$n.adj <-NULL
 mcl}
 
 

Modified: branches/distr-2.2/pkg/distr/R/sqrt.R
===================================================================
--- branches/distr-2.2/pkg/distr/R/sqrt.R	2009-10-06 12:16:11 UTC (rev 601)
+++ branches/distr-2.2/pkg/distr/R/sqrt.R	2009-10-06 13:04:28 UTC (rev 602)
@@ -1,6 +1,7 @@
 setMethod("sqrt", signature(x = "PosSemDefSymmMatrix"), function(x){
             er <- eigen(x)
             d <- sqrt(er$values)
-            return(er$vectors %*% diag(d) %*% t(er$vectors))
+            D <- if(length(d)==1) diag(1)*d else diag(d)
+            return(PosSemDefSymmMatrix(er$vectors %*% D %*% t(er$vectors)))
 })
 

Modified: branches/distr-2.2/pkg/distr/inst/doc/Rplots.pdf
===================================================================
--- branches/distr-2.2/pkg/distr/inst/doc/Rplots.pdf	2009-10-06 12:16:11 UTC (rev 601)
+++ branches/distr-2.2/pkg/distr/inst/doc/Rplots.pdf	2009-10-06 13:04:28 UTC (rev 602)
@@ -2,8 +2,8 @@
 %âãÏÓ\r
 1 0 obj
 <<
-/CreationDate (D:20091006141539)
-/ModDate (D:20091006141539)
+/CreationDate (D:20091006145810)
+/ModDate (D:20091006145810)
 /Title (R Graphics Output)
 /Producer (R 2.10.0)
 /Creator (R)
@@ -47,7 +47,7 @@
 38.97 172.78 m 148.04 172.78 l S
 38.97 227.22 m 148.04 227.22 l S
 38.97 281.66 m 148.04 281.66 l S
-38.97 336.09 m 148.04 336.09 l S
+38.97 336.10 m 148.04 336.10 l S
 38.97 390.53 m 148.04 390.53 l S
 38.97 444.97 m 148.04 444.97 l S
 0.000 0.000 0.000 RG
@@ -275,14 +275,14 @@
 65.15 74.45 l
 65.25 74.75 l
 65.35 75.05 l
-65.45 75.36 l
+65.45 75.37 l
 65.55 75.68 l
 65.65 76.01 l
 65.75 76.34 l
 65.85 76.68 l
 65.96 77.03 l
 66.06 77.39 l
-66.16 77.75 l
+66.16 77.76 l
 66.26 78.13 l
 66.36 78.51 l
 66.46 78.90 l
@@ -315,7 +315,7 @@
 69.19 93.26 l
 69.29 93.95 l
 69.39 94.66 l
-69.49 95.38 l
+69.49 95.37 l
 69.59 96.11 l
 69.70 96.85 l
 69.80 97.61 l
@@ -351,7 +351,7 @@
 72.83 127.42 l
 72.93 128.67 l
 73.03 129.93 l
-73.13 131.22 l
+73.13 131.21 l
 73.23 132.51 l
 73.34 133.83 l
 73.44 135.17 l
@@ -367,7 +367,7 @@
 74.45 149.49 l
 74.55 151.02 l
 74.65 152.57 l
-74.75 154.13 l
+74.75 154.14 l
 74.85 155.72 l
 74.95 157.32 l
 75.05 158.94 l
@@ -375,12 +375,12 @@
 75.26 162.23 l
 75.36 163.91 l
 75.46 165.60 l
-75.56 167.31 l
+75.56 167.30 l
 75.66 169.03 l
 75.76 170.77 l
 75.86 172.53 l
 75.96 174.31 l
-76.06 176.10 l
+76.06 176.11 l
 76.17 177.92 l
 76.27 179.74 l
 76.37 181.59 l
@@ -401,20 +401,20 @@
 77.88 211.18 l
 77.99 213.27 l
 78.09 215.38 l
-78.19 217.50 l
+78.19 217.49 l
 78.29 219.63 l
 78.39 221.77 l
 78.49 223.93 l
 78.59 226.10 l
 78.69 228.28 l
-78.79 230.48 l
+78.79 230.47 l
 78.90 232.68 l
 79.00 234.90 l
 79.10 237.12 l
 79.20 239.36 l
 79.30 241.61 l
 79.40 243.87 l
-79.50 246.13 l
+79.50 246.14 l
 79.60 248.41 l
 79.70 250.70 l
 79.81 252.99 l
@@ -423,21 +423,21 @@
 80.11 259.92 l
 80.21 262.24 l
 80.31 264.57 l
-80.41 266.90 l
-80.51 269.24 l
+80.41 266.91 l
+80.51 269.25 l
 80.61 271.59 l
 80.72 273.94 l
 80.82 276.30 l
 80.92 278.66 l
 81.02 281.02 l
 81.12 283.39 l
-81.22 285.76 l
+81.22 285.75 l
 81.32 288.13 l
 81.42 290.50 l
 81.52 292.87 l
 81.63 295.25 l
 81.73 297.62 l
-81.83 299.99 l
+81.83 300.00 l
 81.93 302.37 l
 82.03 304.74 l
 82.13 307.11 l
@@ -446,7 +446,7 @@
 82.43 314.20 l
 82.54 316.56 l
 82.64 318.92 l
-82.74 321.26 l
+82.74 321.27 l
 82.84 323.61 l
 82.94 325.95 l
 83.04 328.28 l
@@ -468,7 +468,7 @@
 84.66 364.26 l
 84.76 366.40 l
 84.86 368.52 l
-84.96 370.63 l
+84.96 370.62 l
 85.06 372.71 l
 85.16 374.78 l
 85.26 376.84 l
@@ -482,10 +482,10 @@
 86.07 392.53 l
 86.17 394.40 l
 86.28 396.24 l
-86.38 398.05 l
+86.38 398.06 l
 86.48 399.85 l
 86.58 401.61 l
-86.68 403.36 l
+86.68 403.35 l
 86.78 405.07 l
 86.88 406.76 l
 86.98 408.42 l
@@ -493,7 +493,7 @@
 87.19 411.66 l
 87.29 413.24 l
 87.39 414.79 l
-87.49 416.32 l
+87.49 416.31 l
 87.59 417.81 l
 87.69 419.27 l
 87.79 420.70 l
@@ -636,7 +636,7 @@
 101.64 305.63 l
 101.74 303.34 l
 101.84 301.05 l
-101.95 298.76 l
+101.95 298.75 l
 102.05 296.46 l
 102.15 294.17 l
 102.25 291.88 l
@@ -664,13 +664,13 @@
 104.47 242.59 l
 104.57 240.43 l
 104.68 238.28 l
-104.78 236.14 l
+104.78 236.15 l
 104.88 234.02 l
 104.98 231.90 l
 105.08 229.80 l
-105.18 227.71 l
-105.28 225.62 l
-105.38 223.56 l
+105.18 227.70 l
+105.28 225.63 l
+105.38 223.55 l
 105.48 221.50 l
 105.59 219.45 l
 105.69 217.42 l
@@ -703,7 +703,7 @@
 108.42 167.87 l
 108.52 166.26 l
 108.62 164.65 l
-108.72 163.06 l
+108.72 163.07 l
 108.82 161.49 l
 108.92 159.94 l
 109.02 158.40 l
@@ -716,7 +716,7 @@
 109.73 148.09 l
 109.83 146.68 l
 109.93 145.29 l
-110.03 143.92 l
+110.03 143.91 l
 110.13 142.56 l
 110.24 141.21 l
 110.34 139.89 l
@@ -861,7 +861,7 @@
 124.39 66.88 l
 124.49 66.80 l
 124.59 66.72 l
-124.69 66.64 l
+124.69 66.63 l
 124.79 66.56 l
 124.89 66.48 l
 125.00 66.40 l
@@ -1093,7 +1093,7 @@
 38.97 172.78 m 34.21 172.78 l S
 38.97 227.22 m 34.21 227.22 l S
 38.97 281.66 m 34.21 281.66 l S
-38.97 336.09 m 34.21 336.09 l S
+38.97 336.10 m 34.21 336.10 l S
 38.97 390.53 m 34.21 390.53 l S
 38.97 444.97 m 34.21 444.97 l S
 BT



More information about the Distr-commits mailing list