R 菜鸟生活篇 整理 Kindle 上的笔记

自从有了 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 笔记,可以留言或发信。

R 菜鸟生活篇 整理 Kindle 上的笔记》上有6条评论

    1. dapeng 文章作者

      你的内容里刘先生那一条我是故意的。图片总不会被屏蔽吧?多说是从望月那儿学来的,目前感觉良好。

      回复

发表评论

电子邮件地址不会被公开。 必填项已用*标注

To create code blocks or other preformatted text, indent by four spaces:

    This will be displayed in a monospaced font. The first four 
    spaces will be stripped off, but all other whitespace
    will be preserved.
    
    Markdown is turned off in code blocks:
     [This is not a link](http://example.com)

To create not a block, but an inline code span, use backticks:

Here is some inline `code`.

For more help see http://daringfireball.net/projects/markdown/syntax