= list(tiling3 = tiling3_pattern))
数据可视化
df %>%
ggplot(aes(year, lifeExp)) + # 设置绘图的aes,包括x轴为年份,..., # 设置图案角度
pattern_spacing = 0.045, outlier.shape = NA, width=0.5) + # 设置图案间距...移除主要网格线
panel.grid.minor = element_blank(), # 移除次要网格线
panel.spacing.x=unit(0,"cm"), # 设置面板间的...x轴间距
axis.text.x=element_blank(), # 移除x轴文本
axis.ticks.x = element_blank(), # 移除x轴刻度...移除绘图背景
plot.margin=unit(c(0.5,0.5,0.5,0.5), units="cm")) # 设置绘图边距