Tag Archive for ggplot2

日历中的夏天

看着有节,摸着无节–打一生活用品不知不觉,夏日已慢慢临近。姑娘们飞扬的裙角,小贩叫卖的西瓜,蚊蝇嗡嗡的声音,以及翻过的一页日历,都提醒着你–夏天快来了。夏季有着不同的定

清明时节说死刑

死刑是自人类社会发展以来就诞生的一种剥夺人生命的刑罚。死刑除了是对于不守规则的事件的惩罚外,也是对破坏规则的情况的一种极重度的威吓。这个史前就已有的制度,是对进行不容于社会的行为的严厉惩罚之一。世界上几乎每一个国家或地区都曾有过“死刑”这种刑罚制度,时至今日,仍有一些国家继续存有并继续执行死刑。然而多数国家已经废止了死刑,有些国家则是已经10年以上未执行过死刑,或是仅允许在战时使用死刑。

在最近卫报的一则文章中,根据从2007到2011年的死刑数据进行了一些可视化工作。特别是根据大赦国际最近公布的一份报告,给出了一份死刑执行情况的气泡地图。形象的说明了当今世界上还有哪些国家在判决与执行死刑。本文则是照猫画虎,以说明R语言中googleVis包ggplot2包的使用方法。

上图是利用卫报所提供的数据,将2007年到2011年所有判决死刑的数字按国别汇总。由于中国对该数据进行了保密,所以2009年后的数据没法得到。但仅基于前两年的数字,也有八千例左右的死刑判决,远超其它国家,所以可以从图上看到“红色的中国”。越是灰色的区域表示死刑判决越少,而白色的区域则是表示废除了死刑的国家,但俄罗斯应该是个例外,估计是缺乏数据的原因。大致来看,似乎社会经济发达的区域,死刑判决数较少。

下图则是从1991年到2011年间,保留死刑的国家数目和废除死刑国家数目的条形图。蓝色条形表示废除死刑国家数目的多少。很容易从图中看到在未来的趋势。

R代码如下:

data1 <- read.csv('d:/data.csv',T)
names(data1) <- c('country','code','sentenced')
library(googleVis)
g1 <- gvisGeoMap(data1, locationvar='code', numvar='sentenced','country',options=list(region='world',colors='[0xDCDCDC,0xEE2C2C,]' ,dataMode="regions",width=600, height=400))
plot(g1)
# print(g1, 'chart')
 
data2 <- read.csv('d:/data2.csv',T)
names(data2) <- c('year','executing','abolitionist')
library(reshape)
data2.melt <-melt(data2,measure=c('executing','abolitionist'))
library(ggplot2)
p <- ggplot(data2.melt,aes(x=factor(year),y=value,fill=variable))
p + geom_bar()

Точечная гистограмма в R (dotplot, ggplot2)

В ggplot2 версии 0.9.0 добавился интересный вариант визуализации данных — dotplot. По сути это гистограмма, которая отражает напрямую количество наблюдений. Не знаю, как это по другому описать, просто взгляните на график: Линиями отражено распределение плотности, «точками» — наблюдения. Шкала x — средняя точность ответов. Данные представлены для двух групп из одного из моих экспериментов. На [...]

ggplot2的新特性:显示二维统计量

ggplot2包可称得上是R语言中最为复杂和炫目的绘图包了。本博客也用了一系列文章对该包进行了介绍。在最近的3月初,其版本从0.89升级到了0.90,升级后的新版本提供了许多新的功能。其中之

数字显微镜下的林书豪

现在网络上最为炙手可热的人物恐怕就是NBA新星林书豪(Jeremy Lin)了,但是俗话说:不怕不识货,就怕货比货。这位初生牛犊与其它NBA巨星相比,到底有多么优秀?还有多少差距?还是让数

用ggplot2包绘制风向风速玫瑰图

风向风速玫瑰图(wind rose)是气象学家常用的图形工具,描述了在一个特定的地点,其风速和风向是如何分布的。风向风速图实际上是一种条形图的扩展,它使用网格化的极坐标系统,用不同…