R.graph
!!!pie()
{{pre
samplepie <- c(13, 23, 15, 17)

names(samplepie) <- c("N", "V", "Q", "S")

pie(samplepie)
}}
{{ref_image pie.png}}