蛙蛙池塘
人生价值的最好体现就是做好本职工作...
posts - 176,  comments - 1499,  trackbacks - 53

蛙蛙牌自动提取Tag算法

摘要:Tag系统是Web2.0的一个招牌应用,如果你有一个经营了好几年的论坛,是不是也想生成自己的一套TAG。别听他们说什么语义WEB,文本聚类算法,TIIDF,余弦定理,相似度算法啥的高深算法(我一个也没整明白),跟我来,简单的计算词频来提取tag的效果就很好。

分析;把每个帖子进行分词,然后把词的出现频率倒序排列,取出前N个就作为TAG了。当然要一个板块一个板块的提取tag,如果把军事板块和情感板块的帖子混杂在一起提取tag,提取出来的tag相关性比较差一些,如果分开提取,相关性要好一些,整体效果好。好多时候做训练算法,语料很重要。先分词吧,自己写分词算法也是弄个词库,自己用正向最大匹配来分词,或者两个两个字的来当词,所以还不如直接用中科院那套呢,直接使用了隐式马尔可夫算法,效果虽说不是很好吧,也能满足需求了,对吧。具体测试代码、分词组件、词库下载见以下链接
http://www.cnblogs.com/edison1024/archive/2006/05/03/390832.html
得点了他那个广告才能显示下载地址,你就点吧,人家提供下载也不容易。分词后要去除停止词,停止词自己从网上搜索一份,如果不去除停止词,最后肯定是“了”,“的”,“我”等词出现的频率最高,你不会把这些常用词做tags吧,呵呵。当然NICTCLAS是可以标注词性的,你可以分词后把语气词、副词等虚词去了,这样更好一些,但我就懒得做了,直接分词、去除停止词两步。
完了计算每个词出现的频率就好说了,弄一个全局的字典,每个词出现一次增加一个计数,第一次出现先添加到字典,并计数为0,最后把出现次数在某个阈值以上的词插入到数据库里,这就是你要的tag了,先来看一下我的效果吧(大家别笑哦,我是从一个美女贴图论坛提取了一些帖子的主题当语料的,为了不降低博客园的PR值,就贴图,不贴文字了)。

开始上代码
先贴分词

namespace WawaSoft.Search.Common
{
    
public sealed class WawaSplitWorder
    
{
        
static List<string> _stopWords = new List<string>();
        
static NICTCLAS _nictclas;
        
public static void Init()
        
{
            
try
            
{
                
//1、初始化分词器
                _nictclas = new NICTCLAS();
                _nictclas.OperateType 
= eOperateType.OnlySegment;
                _nictclas.OutputFormat 
= eOutputFormat.PKU;

                
//2、加载停止词
                using (StreamReader sr =
                    
new StreamReader("data\\StopWords.txt", Encoding.Default))
                
{
                    
string temp;
                    
while ((temp = sr.ReadLine()) != null)
                    
{
                        _stopWords.Add(temp);
                    }

                }

            }

            
catch (Exception ex)
            
{
                Trace.TraceError(
"初始化分词器错误:{0}", ex);
            }

        }


        
/// <summary>
        
/// 分词并去除停止词
        
/// </summary>
        
/// <param name="input"></param>
        
/// <returns></returns>

        public static IEnumerable<string> SplitWords(string input)
        
{
            Console.WriteLine(input);
            
            
//预处理,不处理那个分词组件有可能内存读写错误,那玩意儿写的不太健壮,容错性8行的说,呵呵
            input = input.Replace("/""");
            input 
= input.Replace(".""");
            
string result = string.Empty;
            List
<string> ret = null;
            
try
            
{
                
//1、分词
                _nictclas.ParagraphProcessing(input, ref result);
                ret 
= new List<string>(
                    result.Split(
new string[] "  " }, StringSplitOptions.RemoveEmptyEntries));
                
                
//2、去除干扰词
                List<string> needRemove = new List<string>();
                
foreach (string word in ret)
                
{
                    
foreach (string s in _stopWords)
                    
{
                        
if (string.Compare(s, word, false== 0)
                        
{
                            needRemove.Add(word);
                            
break;
                        }

                    }

                }


                
foreach (string removeWord in needRemove)
                
{
                    ret.Remove(removeWord);
                }

            }

            
catch (Exception ex)
            
{
                
//错误的时候除了打出错误详细信息后打出出错的上下文,传入的参数,临时变量等有助于从trace里分析错误,要不死了也不知道怎么死的
                Console.WriteLine("{0}\r\n{1}",input,ex);
            }


            
return ret;
        }

    }

}



计算词频

class AutoGenTag
{
    
//大字典,保存每个词的词频,key是词,value是词频
    static Dictionary<string,int> _hashlist = new Dictionary<stringint>(10240);

    
public static void Excute()
    
{
        
//1、取出帖子,越多越好,越多提取的准确性越高
        IEnumerable<string> source = Dao.GetPostTitles();
        
foreach (string str in source)
        
{
            
//2、把每个帖子主题分词
            IEnumerable<string> words = WawaSplitWorder.SplitWords(str);
            
if(words == null)
                
continue;

            
//3、把每个词插入到大字典里,以前存在就把词频加1
            foreach (string word in words)
            
{
                
if(_hashlist.ContainsKey(word))
                
{
                    _hashlist[word]
++;
                }

                
else
                
{
                    _hashlist.Add(word,
0);
                }

            }

        }

        
//4、把大于某个阈值(这里是20)的词插入数据
        foreach (KeyValuePair<stringint> pair in _hashlist)
        
{
            
//如果一次循环插入几万个词,SQLSERVE每秒提交的批会很高,有可能CPU瞬间很高,Sleep(0)能让CPU长得慢点儿,Sleep(1)也行,不过我不知道这两个的区别。或者直接 用sqlserver的bilkcopy性能也8错
            Thread.Sleep(0);
            
if (pair.Value > 20)
            
{
                Console.WriteLine(
"{0}-{1}",pair.Key,pair.Value);
                Dao.addtags(pair.Key, pair.Value);
            }

        }

    }

}



代码写的比较糙,大家凑合看,都是随手写的。最后写一个sql查出tag并按词频倒序排列,选出一个datatable,用datalist一绑定就O了。当然了,我这是提取标签的土法,大师们看了别吐,呵呵。

Tag标签: 分词 标签
posted on 2008-04-29 23:34 蛙蛙池塘 阅读(2546) 评论(21)  编辑 收藏 所属分类: 综合区

FeedBack:
2008-04-29 23:41 | 怪怪      
妈呀, 看得我....
  回复  引用  查看    
#2楼 [楼主]
2008-04-29 23:48 | 蛙蛙池塘      
@怪怪
咋了,呵呵,我提取出来还是有一些不纯,呵呵,其实博客园应该提取一套tag
  回复  引用  查看    
2008-04-30 00:27 | Jeffrey Zhao      
背景有颜色阿,还是不错的。
  回复  引用  查看    
2008-04-30 07:29 | DeltaCat [未注册用户]
“或者直接 用sqlserver的bilkcopy性能也8错” 应该是 bulkcopy 吧,呵呵
  回复  引用  查看    
2008-04-30 08:20 | 李战      

  回复  引用  查看    
2008-04-30 09:37 | 镜涛      
支持,学习
  回复  引用  查看    
2008-04-30 09:37 | 镜涛      
支持,学习
  回复  引用  查看    
2008-04-30 09:42 | 雨中漫步的太阳      

  回复  引用  查看    
2008-04-30 09:45 | wingoo      
也做过一个tag提取的,不过是在存储过程中写的,当然全是英文的,没分词..
  回复  引用  查看    
2008-04-30 11:26 | graystar [未注册用户]
Sleep(0) ,让出CPU时间,进入下一次排队,
  回复  引用  查看    
2008-04-30 13:03 | 海洋      

  回复  引用  查看    
2008-04-30 14:11 | zzz [未注册用户]
太强了啊
  回复  引用  查看    
2008-04-30 14:59 | mafa      
好,简单技术办大事
  回复  引用  查看    
2008-04-30 16:11 | nicye      
不想看,路过
  回复  引用  查看    
2008-04-30 16:39 | Eric Fine      
呱呱我来踢馆的~
  回复  引用  查看    
2008-04-30 16:44 | overred      
美女"(816") | 身材"(112") | 空姐"(58") | 看看"(47") | 图片"(36") | 老师"(32") | 白领"(26") | 裙子"(22") |
少妇"(474") | 内衣"(112") | 激情"(58") | 大学生"(47") | 女星"(35") | 内裤"(31") | 拍摄"(25") | 酒吧"(22") |
性感"(406") | 这样"(99") | 宾馆"(57") | 过程"(46") | 北京"(35") | 10P"(30") | 怎么"(25") | 极限"(22") |
漂亮"(330") | 小姐"(95") | 模特"(57") | 秘书"(46") | 喜欢"(35") | 真正"(30") | 据说"(25") | 春光"(22") |
MM"(322") | 第一"(90") | 风骚"(56") | 明星"(46") | 这个"(35") | 女子"(30") | 现场"(25") | 清醇"(22") |
写真"(197") | 中国"(83") | 成熟"(55") | 如此"(45") | 大学"(34") | AV"(29") | 出来"(25") | 裸体"(22") |
诱惑"(196") | 丰满"(81") | 丝袜"(54") | 大家"(44") | 大胆"(34") | 风情"(28") | 学生"(24") | 胸部"(21") |
日本"(163") | 真实"(76") | 可爱"(54") | 女郎"(43") | 艺术"(34") | 国产"(28") | 乳房"(24") | 不错"(21") |
妹妹"(154") | 绝对"(76") | 衣服"(52") | 护士"(41") | 什么"(33") | 透明"(28") | 开放"(24") | 姐姐"(21") |
女人"(146") | ~~"(70") | 上海"(51") | 台湾"(41") | 网友"(33") | 抓拍"(28") | 竟然"(23") | 最新"(21") |
女孩"(138") | 一个"(70") | 迷人"(50") | 清晰"(40") | 同事"(33") | 办公室"(28") | 6p"(23") | 女友"(21") |
少女"(138") | 照片"(69") | 酒店"(50") | 鼻血"(39") | 校花"(33") | 旗袍"(27") | 浴室"(23") | 正点"(21") |
极品"(128") | 女生"(68") | 这么"(49") | 气质"(39") | 公司"(33") | 青春"(27") | 魅力"(23") | 暴露"(21") |
清纯"(123") | 生活"(66") | 街头"(49") | 香港"(38") | ~~~"(32") | 完美"(27") | 广州"(23") | 后悔"(21") |
偷拍"(114") | 男人"(62") | 尤物"(48") | 诱人"(38") | 洗澡"(32") | 公园"(26") | 白嫩"(22") | 经典"(21")
美丽"(113") | ——"(59") | 超级"(47") | 韩国"(37") | 短裙"(32") | 美艳"(26") |

  回复  引用  查看    
#17楼 [楼主]
2008-04-30 16:51 | 蛙蛙池塘      
我晕,在博客园贴不相关的文字会降低博客园的PageRank值的,呵呵。
  回复  引用  查看    
2008-04-30 16:56 | overred      
@蛙蛙池塘
这下让搜索引擎色一把
  回复  引用  查看    
2008-04-30 17:55 | soocat [未注册用户]
我的一个分词算法
http://www.soocat.com/s.aspx
  回复  引用  查看    
2008-05-01 09:09 | works guo      
学习
  回复  引用  查看    
#21楼 [楼主]
2008-05-01 13:00 | 蛙蛙池塘      
@soocat
很不错,不过我就不重复劳动了,有一个能用就行了
  回复  引用  查看    
残荷听雨,梨花飞雪,落英缤纷时节。晓来谁染枫林醉?点点都是离人泪
活着,就是快乐!自信,就是美丽! 有人爱,就是幸福。
春天来了
但愿野百合也有春天

第一季度的计划


看完几本书:
《应用程序框架设计》
《lucene in action》
《P2P网络技术原理与系统开发案例》

<2008年4月>
303112345
6789101112
13141516171819
20212223242526
27282930123
45678910

与我联系

常用链接

留言簿(39)

我参与的团队

我的标签

随笔分类