目前主站(
http://cos.name)的横幅是这样的:
x = c(1503, 1465, 1446, 1376, 1078, 1197, 1468, 1554, <br />
1644, 1820, 1546, 1324, 1345, 1726, 1758, 1783, 1793, 1610, <br />
1396, 1511, 1674, 1882, 2026, 1959, 1676, 1404, 1603, 1771, <br />
1790, 1618, 1706, 1693, 1380, 1473, 1774, 1726, 1395, 1904, <br />
2651, 1629, 1814, 1790, 1848, 1825, 1754, 1789, 1179, 1248, <br />
1605, 1497, 1358, 1356, 1272, 998, 887, 1138, 1084, 984, <br />
946, 769, 527, 328, 417, 530, 581, 624, 651, 689, 914, 1124, <br />
1309, 1225, 1213, 1227, 944, 986, 1157, 1360, 1370, 1485, <br />
1414, 1037, 1212, 1616, 1726, 1807, 1750, 1626, 1300, 1527, <br />
1932, 2012, 2008, 2019, 2040, 1614, 1743, 2161, 2304, 2526, <br />
2950, 2295, 1796, 1760, 2321, 2389, 2252, 2116, 1958, 1543, <br />
1546, 2039, 2072, 2149, 2202, 1832, 1551, 1739, 2219, 2310, <br />
2098, 2108, 1871, 1678, 1641, 2157, 2177, 2173, 2060, 1926, <br />
1569, 1552, 1800, 2086, 2151, 2174, 2046, 1701, 1727, 2250, <br />
2269, 1754, 1523, 2075, 1759, 1866, 2173, 1685, 2104, 2361, <br />
2083, 1813, 1841, 2219, 2227, 2055, 1896, 1455, 1678, 1814, <br />
2225, 2249, 2458, 2344, 2361, 1946, 2012, 2467, 2489, 2566, <br />
2317, 2147, 1964, 1966, 2381, 2424, 2363, 2508, 2235, 2025, <br />
1996, 2431, 2312, 1229, 52, 737, 1756, 1981, 2092, 2085, <br />
2147, 2048, 1835, 1529, 1678, 1920, 2181, 2058, 2020, 1854, <br />
1681, 1746, 2048, 1969, 185) # 猜一猜这是什么数据?<br />
<br />
png("banner-visit.png", width = 900, height = 100)<br />
par(mar = rep(0, 4))<br />
plot(x, type = "o", col = gray((max(x) - x)/diff(range(x)) * <br />
0.7 + 0.2), pch = 20, ann = FALSE, axes = FALSE, panel.first = grid())<br />
dev.off()<br />
<br />
png("banner-hist.png", width = 30, height = 100)<br />
par(mar = rep(0, 4))<br />
tmp = hist(x, 30)<br />
barplot(tmp$counts, space = 0, col = "black", border = NA, <br />
horiz = T, axes = FALSE, ann = FALSE)<br />
abline(v = 0)<br />
dev.off()
我随便设计的一个,可能很土很山寨,期待有会员作一幅漂亮的banner替换它。规格:960px*100px;最好是PNG格式。