很二很天真

讲故事的套路

2019-06-30T00:00:00+00:00

首先一个让我感到有点恐慌的事情，是不知道该给每篇博客选择哪些标签，虽然这不是必须的，但是也反映出我悲催的概括能力，大概取不好变量名也是同样的原因。

今天无意间在 YouTube 上看到一个冯内古特的演讲，主题是 “Shape of Stories”，很值得一看。

这篇博客和演讲内容无关，只是借这个主题记录一下以前的一点想法。

天涯上有一篇红楼梦考据贴，考证作者是傅山，里面的角色事件都有现实中的对应。这是我第一次看索隐派的文章，还觉得挺有说服力的，当然这可能是因为我不了解相关的事实，看不出文中的纰漏。抛开这篇文章的正确性不谈，看完之后我觉得类比真实事件是拟提纲的好方法。首先，这些事情已经发生过，不会有情节荒谬无稽的担心（诚然，现实生活中也有很多事情比编造的故事还让人难以置信）。其次，不用担心写跑偏，真实事件细节无限丰富，任何时候觉得写不下去了，再参照一下相关内容即可，也可以把不同事情交织起来作为一个故事，选择的余地就更多了。

再举个例子，刘宝瑞的《书迷打砂锅》里说《三侠五义》里的人物全是按屋子里的东西编出来的，也算一个大工程了。知乎还有人按这招编出过一个武侠故事大纲。

照着这个思路再拓展一下，为了增加故事性，这个大纲最好不要由人来拟，可以发挥计算机的特长，给一堆候选元素，比如各种事件、人物，从里面随机选择，打乱顺序，再发挥人的创造性，用这些元素编一个完整的故事提纲。这一步之后，其实只剩下半机械的翻译工作，把真实事件里的人事物翻译成大纲设定里的对应元素，这个甚至也可以用机器来完成。考虑到 GPT-2 这类模型的快速发展，想必要不了多久就能实现。最后再由人来统一润色一遍就完事，写作效率会有几个数量级的提升。

1984 里真理部小说司批量生产色情文学的那一天估计也不远了。

漠然

2019-06-23T00:00:00+00:00

这几天在断断续续地写规划了很长时间的饭否客户端，测试数据来自“随便看看”，因为每一刷都有新的结果，内容样式也很丰富，是很好的测试用例。

以前在各个网站上都只会看自己关注的内容，生活中就更不用说了，和陌生人偶然对上眼神都会生出一丝不自在，与自己无关的人事从来都是敬而远之。这次密集地刷新几百次饭否，看了几千条各式各样的消息，有人在如火如荼地版聊，有人在形单影只地叹息，有人在坚定决绝地挥别过往，有人在小心翼翼地眷恋现在，有人的幸福溢出屏幕，有人的悲伤难以掩藏。生活的多样性突然出现在眼前，击碎一惯的冷漠，但我又能做啥呢？自顾不暇，还是只能做一个旁观者。

间歇性话痨

2019-04-27T00:00:00+00:00

人的表达欲也是会逐渐累积的，太久不说话（不管是哪种输出渠道都算）就会觉得憋得难受，总得找个地方说出来才行。

以前读书的时候在网上（主要是豆瓣）灌了不少水，后来慢慢意识到自己的浅陋，就尽量不在公共场合放甚厥词，以免贻笑大方。有些憋不住的都写在了饭否，渐渐地甚至连饭否都让我有一种“暴露智商”的感觉，发饭频率也越来越低。

于是又回过头翻出尘封的博客，让它再发挥一下余热吧。

最美的微笑

2017-08-05T00:00:00+00:00

在我看过的展览里，最美的微笑应当属于各种佛教造像。印象尤其深刻的是永宁寺的佛面和青州龙兴寺的造像。

前者见于故宫“梵天东土并蒂莲华”展，此前看《洛阳伽蓝记》时已经为永宁寺的瑰丽而倾倒，在亲眼见到这个佛面之后更是心折不已。

后者机缘巧合在不同场合看过几次，第一次是央美的青州龙兴寺佛教造像特展，后来在国博和故宫又屡次邂逅。

“温柔的慈悲”，大概就是这些造像给人的感觉吧。

判断算法是否能被改进

2016-03-04T00:00:00+00:00

本文介绍一种根据算法产生的信息量来定性判断其是否有改进余地的方法。这个很简单的思路是前几年想到的，上周又应用了一次，找地方记录一下。

举个例子：找出 $n$ 个未排序数字中最小的 $k$ 个，$n \gg k$。

方法一：先排序，再取前面 $k$ 个数，时间复杂度 $O(n \log n)$。

这个算法是不是最优的呢？我们可以对比一下目标和结果：

目标：找出最小的 $k$ 个数；
结果：最小的 $k$ 个数，并且按照大小排序。

可以看到，虽然排序的方法能够解决问题，但结果相对目标而言太强了，我们还得到了额外的信息——原来的问题里并不要求结果是有序的。子曰，天下没有免费的午餐，这些额外的信息必然会带来额外的开销。这个时候就应该意识到，很可能有更高效（更经济）的算法存在。

方法二：用前 $k$ 个数字建立一个大小为 $k$ 的 max-heap，然后依次将剩下的 $n-k$ 个数字 $d_i, i \in [k+1, n]$ 和堆顶数字 $d_{top}$ 比较，若 $d_i$ 小于 $d_{top}$，将 $d_{top}$ 替换为 $d_i$，并重新 heapify；否则跳过 $d_i$。最后得到的 $k$ 个数就是最小的 $k$ 个。时间复杂度 $O(k + (n-k) \log k)$。

比起方法一，时间复杂度降低了不少，但我们还是得到了额外的信息：我们知道了 $k$ 个数之间的部分大小关系，比如可以在 $O(1)$ 的时间内得到 $k$ 个数中的最大值（堆顶的数字）。

方法三：先用 Median of medians 算法找出第 $k$ 大的数 $d_k$，这一步的时间复杂度 $O(n)$。然后遍历数组，将小于等于 $d_k$ 的数找出来（这里不考虑有重复数字的情况）。总的时间复杂度也是 $O(n)$。

其实选择 $d_k$ 的过程也会将这 $n$ 个数字按照大小分组，但是这个额外信息比起前两种方法得到的要弱很多，所以方法三优于前两者。实际上 $O(n)$ 的算法已经是渐进最优的，因此我们可以断定，即便还存在效率更高的算法，在渐进意义上也不可能优于方法三了。

用ydcv在Vim里查单词

2013-07-22T00:00:00+00:00

安装ydcv：pacman -S ydcv。ydcv是有道词典的命令行版本，类似于Stardict的sdcv，如果一直联着网的，用这个比较方便，因为可以查整个句子。

在.vimrc里添加两个函数和对应的快捷键映射（抄自Github上的一个脚本，不过我没有用split window来显示结果）：

 " look up current word under cursor
 function! SearchWord()
     let expr = '!ydcv -s ' .expand("<cword>")
     exec expr
 endfunction
        
 " translate selected text
 function! SearchWord_v(type, ...)
     let sel_save = &selection
     let &selection = "inclusive"
     let reg_save = @@
            
     if a:0
         silent exe "normal! `<" . a:type . "`>y"
     elseif a:type == 'line'
         silent exe "normal! '[V']y"
     elseif a:type == 'block'
         silent exe "normal! `[\<C-V>`]y"
     else
         silent exe "normal! `[v`]y"
     endif
             
     let word = @@
     let expr = '!ydcv "' . word . '"'
     exec expr
            
     let &selection = sel_save
     let @@ = reg_save
 endfunction
            
 nnoremap <Leader>d :call SearchWord()<CR>
 vnoremap <Leader>d :<C-U>call SearchWord_v(visualmode(), 1)<cr>

:source $MYVIMRC

大功告成。查询光标下的单词或者visual模式里选中的内容，直接按<Leader>d就行。

效果图：

缺点有两个，一是可能有延迟，这个看网络情况，二是之前查询的结果会一直显示（Gvim里没这个问题，不过会显示终端下的颜色代码）。

顺便说一下，还有一个更简单的方法：Vim里有个命令是K，会调用keywordprg这个变量指定的程序查询光标下的单词，keywordprg的默认值是man，把这个改成ydcv可以实现同样的效果（也能在visual模式使用），可参考:h keywordprg。

蛋疼的TeXLive

2013-07-11T00:00:00+00:00

好久没在Arch里编译tex，Windows里后来装的那些包Arch里都没有，本来想一劳永逸地解决自动/半自动安装缺失package的问题，结果白白浪费了一上午的时间……自带的tlmgr没法用，aur里的texlive-localmanager也是千疮百孔，作者一年前就没有再维护了，参考Arch的Wiki改了一下，可惜只能用一部分功能。

全手动安装一个包之后实在受不了，最后决定放大招，把Windows上MiKTeX的tex文件夹拷过来，放在~/texmf下面，然后texhash ~/texmf，终于通过了编译。MiKTeX自带的包放在%ProgramFiles%\MiKTeX 2.9\tex下面，编译过程中自动安装的缺失包放在%AppData%\MiKTeX\2.9\tex下面，都复制过去就行了。

其实想起来这个功能也不难实现，本地维护一个表，保存cls文件到对应package的映射，CTAN上的路径都是固定的，要自动下载也很简单，不知道为啥到现在都还没实现，等有时间了来试一下。

xkcd quotation

2013-06-07T00:00:00+00:00

Take wrong turns. Talk to strangers. Open unmarked doors. And if you see a group of people in a field, go find out what they are doing. Do things without always knowing how they’ll turn out. You’re curious and smart and bored, and all you see is the choice between working hard and slacking off. There are so many adventures that you miss because you’re waiting to think of a plan. To find them, look for tiny interesting choices. And remember that you are always making up the future as you go.

—— Randall Munroe

via Choices: Part 4

用AutoHotkey让Foxit Reader模拟Vim的操作

2012-05-22T00:00:00+00:00

我已经有一段时间没用过鼠标了（因为无线鼠标电池用完了懒得去买……），平时可以用小红点，但是翻文档（主要是看pdf）的时候没啥好办法。习惯了Vim的按键，再用方向键觉得很别扭，Apvlv功能还是弱了一点，那就用AHK曲线救国吧。

很简单粗暴的方法：

;在Foxit中模拟Vim的操作
#IfWinActive, ahk_class classFoxitReader
j::Down
k::Up
h::Send ^+{Tab}
l::Send ^{Tab}
^f::PgDn
^b::PgUp
g::Home
o::Send ^o
d::Send ^w
q::Send !{F4}
#IfWinActive

不过有时候^f和^b会失效，不知道为啥，往下翻页还能用空格来代替，往上翻页就只能用pageup了。

douban claim

2012-05-18T00:00:00+00:00

doubanclaim85aae8b364636cb8