[数据分析] 也做《倚天屠龙记》的词频分析

网上有篇文章叫《[数据分析]基于人物登场率生成《倚天》词云图》(由于转的比较乱,原文请自行查找)。基于兴趣,我也分析了一下数据。为了进一步查看数据,本文的算法是基于字长,从长度1至长度9进行取词分隔符,再统计每个词的出现次数,然后列出排名前20的高频词。程序基于C#实现,源代码在末尾。

在这里插入图片描述
结果都在上图中,直白明了,就不做分析了,大家自己看吧。

附:源代码

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace TestProject
{
    class Novel
    {
        public void ReadTest()
        {
            // 文件大小:2,891,224 总字符数:979,116
            string input = @"d:\data\yttlj.txt";
            string alltext = File.ReadAllText(input);
            alltext = FormatText(alltext);

            List<TextItem> items = analyze(alltext, 3); // 3 表示字长。
            foreach (var item in items.Where(item => item.Occurence > 10).OrderByDescending(item => item.Occurence))
            {
                Console.WriteLine(item);
            }
            Console.WriteLine(items.Count);
        }

        private string FormatText(string text)
        {
            StringBuilder sb = new StringBuilder();
            for (int i = 0; i < text.Length; i++)
            {
                if (text[i] >= '\u4e00' && text[i] <= '\u9fa5')
                    sb.Append(text[i]);
            }
            return sb.ToString();
        }

        private List<TextItem> analyze(string text, int keylen)
        {
            Dictionary<string, int> dic = new Dictionary<string, int>();
            for (int i = 0; i < text.Length - keylen; i++)
            {
                string key = text.Substring(i, keylen);
                if (!dic.Keys.Contains(key))
                {
                    dic.Add(key, 1);
                }
                else
                {
                    dic[key] = dic[key] + 1;
                }
            }

            List<TextItem> items = new List<TextItem>();
            foreach (string key in dic.Keys)
            {
                items.Add(new TextItem(key, dic[key]));
            }
            items.OrderByDescending(item => item.Occurence);

            return items;
        }

        class TextItem
        {
            public string Word;
            public int Occurence;
            public TextItem(string word, int occ)
            {
                Word = word;
                Occurence = occ;
            }

            public override string ToString()
            {
                return Word + "\t" + Occurence;
            }
        }
    }
}

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值