fix #149

edzer · edzer · commit 7cf531d1bcf1 · 2026-01-22T14:51:21.000+01:00
diff --git a/vignettes/st.Rnw b/vignettes/st.Rnw
@@ -120,8 +120,7 @@ The resulting plot is shown in Figure~\ref{fig:acf}.
 par(mfrow=c(2,2))
 # select 4, 5, 6, 7
 for (i in rn) {
-  x <- as.numeric(na.omit(r5to10[i, ]))
-  acf(x, main = i)
+  acf(na.omit(r5to10[i,]$PM10), main = i)
 }
 par(mfrow=c(1,1))
 @

Original file line number	Diff line number	Diff line change
`@@ -120,8 +120,7 @@ The resulting plot is shown in Figure~\ref{fig:acf}.`
`120`	`120`	`par(mfrow=c(2,2))`
`121`	`121`	`# select 4, 5, 6, 7`
`122`	`122`	`for (i in rn) {`
`123`		`- x <- as.numeric(na.omit(r5to10[i, ]))`
`124`		`- acf(x, main = i)`
	`123`	`+ acf(na.omit(r5to10[i,]$PM10), main = i)`
`125`	`124`	`}`
`126`	`125`	`par(mfrow=c(1,1))`
`127`	`126`	`@`