基于tkinter的交互式文本分析
功能
- 對(duì)文本進(jìn)行切詞香拉，切詞結(jié)果會(huì)出現(xiàn)在桌面岁疼，并且能夠動(dòng)態(tài)查詢每個(gè)詞的前后幾個(gè)字
- 根據(jù)關(guān)鍵詞匹配excel每一行文本以定位具體問題（該部分代碼未給出）
要求
- windows系統(tǒng)
- 文本存放在excel中实牡，并且位于最右邊一列
分析過程
- 點(diǎn)擊運(yùn)行會(huì)出現(xiàn)彈窗，選擇需要分析的文本文件（文本存于excel中）
-
jieba切詞完成后結(jié)果文件會(huì)出現(xiàn)在桌面上虽抄，接著會(huì)彈出如下窗口脸侥，
8605744-dad8de35163871e9.png -
可以查詢?nèi)我庠~前后出現(xiàn)的字，以確定該詞的主要語境扇住。如
8605744-74aacbf4aaccf0f8.png
完整代碼
import pandas as pd
import tkinter.messagebox
import winreg
import tkinter as tk
import win32ui
from os import chdir, path
from jieba.analyse import extract_tags
from re import sub, findall
from collections import Counter
cut_wr=None # 全局變量
class txt():
'''初始化屬性
word_cut切詞春缕，word_count詞頻，word_before_after詞的前后幾個(gè)字
'''
def __init__(self,filename):
self.filename=filename
def word_cut(self): #cut_w=[] # 存放數(shù)據(jù)
cut_w=[];ct=0;cut_words=""
Target=pd.read_excel(self.filename).fillna("A").iloc[:, -1] # 文本在最后一行
for word in Target:
ct+=1
if ct%2000==0: print(ct) # 看速度
word=sub("[\：\·\—\艘蹋，\锄贼。\“ \”\>\）\【\】\？\簿训！\,\/\ ]", "|", str(word).strip("\n").strip("\r\n"))
cut_w.append(word)
seg_list = extract_tags(word, topK=None) # textrank
cut_words += ("/".join(seg_list)+"/||")
global cut_wr
cut_wr = "||".join(cut_w) # 段落||隔開
self.all_words = cut_words.split("/") # 詞/隔開
def word_count(self):
self.word_cut() #!!!!!!!!!!!!記得引用
cout = Counter(self.all_words) # # 用于統(tǒng)計(jì)詞和詞頻
wd = []; quent = [] # 詞咱娶、頻
for (k, v) in cout.most_common():
wd.append(k)
quent.append(v)
qieci = pd.DataFrame([wd, quent]).T
qieci.to_excel("切詞結(jié)果textrank.xlsx", encoding='GB18030')
def word_before_after(self, wrd, m, n, L):
sword = "("+"\S"*m+wrd+"\S"*n+")" # 前m個(gè)字，后n個(gè)字
w = findall(sword,cut_wr)
c2 = Counter(w)
wd2 = []; quent2 = []
for (k, v) in c2.most_common():
if v > L: # 出現(xiàn)L次之上
wd2.append(k)
quent2.append(v)
pd.set_option('max_rows', 500)
return pd.DataFrame([wd2, quent2]).T
key = winreg.OpenKey(winreg.HKEY_CURRENT_USER, r'Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders')
desk=winreg.QueryValueEx(key, "Desktop")[0] # windows的桌面路徑
dlg = win32ui.CreateFileDialog(1) # 1表示打開文件對(duì)話框
dlg.SetOFNInitialDir(desk)
dlg.DoModal() # 設(shè)置打開文件對(duì)話框中的初始顯示目錄
filename = dlg.GetPathName() # 獲取選擇的文件名稱
mytxt=txt(filename) # 初始化
mytxt.word_count() # 切詞輸出
print("-----------------分析完成-----------------")
# ..................................窗口初始化.............................
# 大小强品、文本框膘侮、文本框說明
window = tk.Tk()
window.title('文本切詞') # 控件名
window.geometry('270x415') # 窗口大小
e1 = tk.Entry(window, show='', width=10) # 交互式文本框
e1.grid(row=1, column=1, sticky=tk.W) # 文本框的位置
e2 = tk.Entry(window, show='', width=5)
e2.grid(row=2, column=1, sticky=tk.W)
e3 = tk.Entry(window, show='', width=5)
e3.grid(row=3, column=1, sticky=tk.W)
e4 = tk.Entry(window, show='', width=5)
e4.grid(row=4, column=1, sticky=tk.W)
tk.Label(window, text=filename.split("\\")[-1], bg='lightblue').grid(row=0, column=1, sticky=tk.W) # 框的標(biāo)簽
tk.Label(window, text="正在分析：").grid(row=0, column=0, sticky=tk.E)
tk.Label(window, text="詞（不要復(fù)制粘貼）", bg='red').grid(row=1, column=0, sticky=tk.E)
tk.Label(window, text="前_個(gè)字：").grid(row=2, column=0, sticky=tk.E)
tk.Label(window, text="后_個(gè)字：").grid(row=3, column=0, sticky=tk.E)
tk.Label(window, text="出現(xiàn)_次以上").grid(row=4, column=0, sticky=tk.E)
tk.Label(window, text="結(jié)果：", bg='red').grid(row=6, column=0, sticky=tk.E)
# ..................................添加按鈕 執(zhí)行.............................
def insert_end():
var1 = str(e1.get())
var2 = int(e2.get())
var3 = int(e3.get())
var4 = int(e4.get())
t.delete(1.0, tk.END)
t.insert("end", mytxt.word_before_after(wrd=var1, m=var2, n=var3, L=var4), 'tag_1')
t.insert("end", "\n查找完成")
b2 = tk.Button(window, text="執(zhí)行", command=insert_end) # 按鈕，函數(shù)
b2.grid(row=5, column=1, sticky=tk.W)
t = tk.Text(window, height=18, width=25)
t.tag_config("tag_1", backgroun="yellow", foreground="red")
t.grid(row=6, column=1, sticky=tk.W)
# ..................................添加按鈕 提示.............................
def hit_me():
tk.messagebox.showinfo(
title='提示', message='文本內(nèi)容需要位于首個(gè)sheet的榛，并且位于最后一列琼了。最后的切詞結(jié)果textrank.xlsx會(huì)出現(xiàn)在桌面')
tk.Button(window, text='提示', command=hit_me).grid(
row=7, column=0, sticky=tk.E) # 按鈕，提示
window.mainloop() # 動(dòng)態(tài)
【分析部分代碼及示例見OneNote】
