bb_aes() for aesthetic mapping, that equivalents to ggplot2::aes().
library(plotbb)
p <- bbplot(mtcars, bb_aes(mpg, disp, col=factor(cyl)))
p + bb_grid(col='grey50', lty='dashed') + bb_point(pch=19)
p2 <- p + bb_point() + bb_lm(bb_aes(group=cyl), lwd=2)
p3 <- p2 + bb_lm(col="red", lwd=3, lty='dotted')
p4 <- p + bb_text(bb_aes(label=cyl), cex=2)
par(mfrow=c(1,3))
p2; p3; p4
- bb_grid
- bb_point
- bb_lm
- bb_text
- more layers need to be added
p2 + bb_labs(title = "hello", sub = "just for demo",
xlab="this is xlab", ylab = "this is ylab") +
bb_title("hello world") # last one rules 
g <- p2 +
bb_theme(col.main="red", cex.main=2,
mar = c(4, 4, 3, 1)) +
bb_title("applying graphics::par")
par(mfrow=c(1,2))
print(g)
p2 + bb_title("theme has no side effect")
bb_theme has no side effect and will only apply to the bbplot object
that it added to. This is very important for developing pre-defined
themes.
par(mfrow=c(1,2))
p3 + bb_theme_expand()
print(p3)
p + bb_grid(col='grey50', lty='dashed') +
bb_point(pch=19) +
bb_theme_expand() +
bb_theme_grey()
p + bb_point(pch=19, cex=2) +
bb_theme_expand() +
bb_theme_deepblue()
- bb_theme_expand
- bb_theme_grey
- bb_theme_deepblue
- develop more pre-defined themes
Not yet implemented
Not yet implemented
Suppose we have existing code to plot something:
plot(mtcars$mpg, mtcars$disp)
abline(lm(disp ~ mpg, data=mtcars), col='red')We can wrap the codes into a function:
f <- function() {
plot(mtcars$mpg, mtcars$disp)
abline(lm(disp ~ mpg, data=mtcars), col='red')
}Then we can convert it to a bbplot object. The plot produced by the
function will be used as the canvas, and we can apply theme and add
layers to it:
library(dplyr)
d <- group_by(mtcars, cyl) %>%
summarize(xm=mean(mpg), ym=mean(disp))
pp <- as.bbplot(f) +
bb_theme_expand() +
bb_theme_grey() +
bb_lm(bb_aes(mpg, disp, group=cyl, col=factor(cyl)), data=mtcars, lwd=2, lty='dashed') +
bb_point(bb_aes(xm, ym, col=factor(cyl)), data=d, pch=19, cex=2) +
bb_title("hello plotbb") +
bb_grid(col='grey30', lty='dashed') ## grid lines were plotted as background by defaultAs there are many features currently not available, plotbb supports
adding layers using base graphics commands that you are already familiar
with. Any base graphics commands in formula, expression or function can
be served as layer to be added to a bbplot object.
pp + (~points(30, 400, pch=19, col="red", cex=3)) +
~text(30, 420, label="hae fun :)", col="blue", cex=1.2)