我正在尝试更改此气泡图中所有标题(主标题和轴标题)的字体。我想使用“Neutraface Text Demi Alt”,尺寸 +14。有人可以帮我吗?你知道任何花哨的气泡图代码吗?
crime <- read.csv("http://datasets.flowingdata.com/crimeRatesByState2005.tsv", header=TRUE, sep="\t")
radius <- sqrt( crime$population/ pi )
2
[1] 2
symbols(crime$murder, crime$burglary, circles=radius, inches=0.35, fg="white", bg="grey", xlab="Murder Rate", ylab="Burglary Rate")
text(crime$murder, crime$burglary, crime$state, cex=0.5)