Displaying 2 results from an estimated 2 matches for "tangle_mathfig06".
2024 Sep 05
1
lattice log scale labels.
...0,138
28,30421755,83776,808
32,471435600,620576,4956
36,7307872110,4700880,33719")
library(lattice)
yscale.components.log2 <- function(...){
ans <- yscale.components.default(...)
ans$left$labels$labels <-
parse(text = ans$left$labels$labels)
ans
}
# pdf("tangle_mathFig06.pdf")
xyplot(c+t+u~n,data=x,type="b", xlab="Size", ylab="Number of tangles",
scales=list(x=list(at=4*(1:9)),y=list(log=2)),
yscale.components=yscale.components.log2,
auto.key=list(columns=3,text=c("(choose m n)","tangles","uniq...
2024 Sep 05
1
lattice log scale labels.
...> 36,7307872110,4700880,33719")
> library(lattice)
> yscale.components.log2 <- function(...){
> ans <- yscale.components.default(...)
> ans$left$labels$labels <-
> parse(text = ans$left$labels$labels)
> ans
> }
>
>
> # pdf("tangle_mathFig06.pdf")
> xyplot(c+t+u~n,data=x,type="b", xlab="Size", ylab="Number of tangles",
> scales=list(x=list(at=4*(1:9)),y=list(log=2)),
> yscale.components=yscale.components.log2,
> auto.key=list(columns=3,text=c("(choose m n)","tang...