Emacs 如何在组织模式表列中填写日期序列

如何在组织模式下用日期填充列并指定日期之间的时间段？我希望能够按照以下思路制作一些东西：

|Date      |Event  |
|----------+-------|  
|2014-03-10|Event 1|  
|2013-03-17|Event 2|  
|2013-03-21|Event 3|  
|and so on |       | 

尝试使用该软件包

这个片段：

m\n7||%(date "2013-03-21" (* x 7))|Event %(1+ x)|

关于C-；扩展到：

|2013-03-21 Thu|Event 1|
|2013-03-28 Thu|Event 2|
|2013-04-04 Thu|Event 3|
|2013-04-11 Thu|Event 4|
|2013-04-18 Thu|Event 5|
|2013-04-25 Thu|Event 6|
|2013-05-02 Thu|Event 7|
|2013-05-09 Thu|Event 8|

如果您知道Elisp，这或多或少是直观的-上面的代码片段是以下内容的简写：

（mapconcat）
（λ（x）
（让（（lst（列表x）））
（格式为“|%s |事件%s |”
（日期为“2013-03-21”（*x7））
（1+x）））
（编号顺序0 7）
“\n”）

您希望插入的日期中有什么模式吗？谢谢，这对我来说非常适合。我想知道是否有一种方法可以在组织模式下使用calc表达式。不客气。以下是谷歌展示的关于calc和org的内容：。我听说过calc的优点，但没怎么用。我有一个想法，用J代替calc来操作组织表，但我还没有实现它。