# 绘制鸢尾花花瓣长和宽的向日葵散点图
data(iris)
par(mar = c(4, 4, 0.2, 0.2))
sunflowerplot(iris[, 3:4], col = "gold", seg.col = "gold",
xlab = "花瓣长度", ylab = "花瓣宽度")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.