自从有了 Kindle 电子书阅读器，读书就得到了解放。dapeng 可以一天不用 iPad，可以一天不看手机，但是不能一天不读 Kindle，因为想读的书，想读的博客（方法见这里），订阅的新闻和微博每天的更新，全都在 Kindle 里。甚至 dapeng 发现，常访问的那些博客，博主们或早或晚都入手了 Kindle，比如最近被墙的坛子，以及刚入手 Kindle 的勺子。使用了一年有余，Kindle 上的常规操作基本都熟悉了，只有一个问题没有好好解决：整理笔记和高亮。
整理之前
Kindle 的笔记和高亮都保存在根目录下documents文件夹里名为“My Clippings.txt”的文本文件里，在 PC 中直接打开是这样的： 
这是按做笔记的时间顺序列下去的，作为摘录型的笔记，日后叫我怎么用啊。应该整理到表格里才方便。
整理方法
网上有些现成的方法，比如下载word的宏，或有人写了专门的软件，或在线转换，但要么是有安全隐患，要么是要收费，要么是不支持中文。还是请万能的 R 来当一次小秘书，帮忙整理一下，免费，方便，快捷，安全，而且可以随心所欲地修改，浑身上下都是闪光点！dapeng 写的代码是这样的：
aa <- readLines("e:\\temp\\My\ Clippings.txt", encoding="UTF-8") length.aa <- length(aa) title <- aa[c(seq(1, length.aa, by = 5))] title.o <- order(title) title <- title[title.o] location <- aa[c(seq(2, length.aa, by = 5))][title.o] time.aa <- substr(location, (regexpr(" Added on ", location) + 10) , nchar(location))[title.o] loc <- substr(location, 13, regexpr(" Added on ", location) - 5)[order(title.o)] highlight <- aa[c(seq(4, length.aa, by = 5))][title.o] zz <- data.frame(Title = title, Highlight = highlight, Loc = loc, Time = time.aa) write.table(zz, "e:\\temp\\Kindle.txt", sep = "\t", row.names = FALSE)
整理之后
好了，经 R 整理的笔记，用办公软件打开，就方便多了： 
免费服务
哪位网友需要 dapeng 帮忙整理的自己的 Kindle 笔记，可以留言或发信。