switch ifelse yes no

tdhock · web-flow · commit f3aa252ecfb5 · 2025-10-29T09:12:42.000-04:00
diff --git a/man/measure.Rd b/man/measure.Rd
@@ -83,7 +83,7 @@ melt(who, measure.vars = measure(diagnosis, gender, ages, pattern="new_?(.*)_(.)
 print(melt(who, measure.vars = measure(
   diagnosis, gender, ages,
   ymin=as.numeric,
-  ymax=function(y)ifelse(nzchar(y), Inf, as.numeric(y)),
+  ymax=function(y)ifelse(nzchar(y), as.numeric(y), Inf),
   pattern="new_?(.*)_(.)(([0-9]{2})([0-9]{0,2}))"
 )), class=TRUE)
 }

Original file line number	Diff line number	Diff line change
`@@ -83,7 +83,7 @@ melt(who, measure.vars = measure(diagnosis, gender, ages, pattern="new_?(.*)_(.)`
`83`	`83`	`print(melt(who, measure.vars = measure(`
`84`	`84`	`diagnosis, gender, ages,`
`85`	`85`	`ymin=as.numeric,`
`86`		`- ymax=function(y)ifelse(nzchar(y), Inf, as.numeric(y)),`
	`86`	`+ ymax=function(y)ifelse(nzchar(y), as.numeric(y), Inf),`
`87`	`87`	`pattern="new_?(.*)_(.)(([0-9]{2})([0-9]{0,2}))"`
`88`	`88`	`)), class=TRUE)`
`89`	`89`	`}`