Liechi seeyou14 Base R: # df from tctcab df.o <- df[order(df[,1]), ] df.o$bd <- "NA" df.o$bd[c(2, 4, 6)] <- "red" barplot(df.o$mpg, border = df.o$bd, col = df.o$cyl)
dapengde Liechi 加个图例: legend('topleft', legend = unique(df.o$cyl), fill = unique(df.o$cyl), title = 'cyl', border = NA, bty = 'n') 已入选 TNT 擂台赛。
seeyou14 tctcab 大神,我再问一个问题,df.sort不是已经是排序过的数据了么,作图之后也应该是有序的,可是当我去掉 tctcab scale_x_discrete(limits= df.sort$car) + 之后图仍然是乱序,这是为什么呢?
dapengde tctcab 代码署名,开始我是这么想的,但是干起来工作量比较大。本例子还好,各部分作者比较清晰,然而更常见的情况是把很多人写的代码东一块西一块拼在一起。整理的琐碎工作,会降低我的积极性 😅 。 目前,每个实例保留了原始出处的链接,并且在前言里加以声明,算是我找到的一个平衡点。 当然,哪位有精力给代码加署名的,欢迎 PR。
tctcab dapengde footnote加句【以上代码由@xxx@xxxx实现,@dapengde 整理,原贴链接 xxxxx。 我觉得要尽量专业的话可以参考SO站,所有so上代码都有cc by sa的licence,代码随便用但是得注明出处。虽然是小事但是我觉得对tnt长远考虑还是很有必要 https://stackoverflow.com/help/licensing