我正在生成一个RMarkdown文档,其中每个块都生成一个图。
对于每个图,我想应用一个特殊的格式化功能来调整标题的显示方式。
有没有办法告诉knitr
/ rmarkdown
将此特殊功能应用于每个块的绘图?例如,也许有一个像{r, fig.function = adjust_title_position}
这样的块选项?
动机是我不想为每个图分别输入函数调用的类型(例如adjust_title_position(plot_42)
),并且同时,我不想使用类似{{1 }},这要求将所有图都定义在一个地方。
以下是可以将其应用于RMarkdown文件的最小示例。
lapply(my_plots, adjust_title_position)
答案 0 :(得分:1)
您可以为select year(t.date),
max(next_5_days_sales),
substring_index(group_concat(date order by next_5_days_sales desc), ',', 1) as date_at_max
from (select t.*,
(select sum(t2.sales)
from t t2
where t2.date >= t.date and t2.date < t.date + interval 5 day
) as next_5_days_sales
from t
) t
group by year(t.date);
个对象重新注册select t.*
from (select t.*,
row_number() over (partition by year(date) order by next_5_days_sales) as seqnum
from (select t.*,
sum(t2.sales) over (order by date range between current row and 4 following) as as next_5_days_sales
from t
) t
) t
where seqnum = 1;
方法。
print