既然R语言的程序已经能运行了，那直接把唐诗的也统计一下。(有空还是用C++写一下，R非常简洁，但是判断不是很精确。)l = scan("tangshi.txt", "character", sep =