上市公司-高管绿色认知原始词频数据及处理代码（2007-2022年）-CSDN博客

本文链接：https://blog.csdn.net/m0_65541699/article/details/138743350

01、数据介绍

高管绿色认知是指企业高层管理人员对环境保护和可持续发展的认识和行动。它包括对环境问题的认知和理解，认识到企业的发展与环境之间的密不可分的关系，并在企业的经营决策中真正考虑到环境保护和可持续发展。同时，高管绿色认知还要求在企业经营中积极探索和实践环保和可持续发展的方案和策略，例如开展环保活动、推广节能减排技术、加强环保宣传等。

本数据包括：高管绿色认知-剔除金融ST的结果、数据整理结果、原始词频数据、企业状态信息等。

数据名称：上市公司-高管绿色认知原始词频数据

数据年份：2007-2022年

02、相关数据及指标

绿色认知：年份、证券代码、行业代码、行业名称、省份、区域、绿色认知总词频

原始词频数据：股票代码、年份、环保意识总词频、节能减排、环保战略、环保理念、环境管理机构、环保教育、环保培训、环境技术开发、环境审计、节能环保、环保政策、环保部门、环保督查、低碳环保、环保工作、环保治理、环保和环境治理、环保设施、环保相关法律法规、环保治污

03、处理代码

import xlwt
import os
 
def matchKeyWords(txt_folder, keyWords):
    files = os.listdir(txt_folder)
    words_num = []  # 保存所有文件词频
    for file in files:
        word_freq = {}  # 单词出现频率次：word：num
        if os.path.splitext(file)[-1] == ".txt":
            txt_path = os.path.join(txt_folder, file)
            with open(txt_path, "r", encoding='utf-8', errors='ignore')as fp:
                text = fp.readlines()
                for word in keyWords:
                    num = 0
                    for line in text:
                        num += line.count(word)
                    word_freq[word] = num
                stock_code = file.split("_")[1:6]
                stock_name = file.split("_")[6:10]
                year = file.split("_")[10:]
                words_num.append((word_freq, stock_code, stock_name, year))
 
    book = xlwt.Workbook(encoding='utf-8', style_compression=0)
 
    sheet = book.add_sheet('年报关键词词频统计', cell_overwrite_ok=True)
    sheet.write(0, 0, '股票代码')
    sheet.write(0, 1, '股票名称')
    sheet.write(0, 2, '年份')
    sheet.write(0, 3, '主要项目')
    sheet.write(0, 3, '项目附注')
 
    for index, one in enumerate(words_num):
        word_f = one[0]
        stock_code = one[1]
        stock_name = one[2]
        year = one[3]
        for ind, word in enumerate(keyWords):
            sheet.write(index + 1, ind + 3, str(word_f[word]))
        sheet.write(index + 1, 0, stock_code)
        sheet.write(index + 1, 1, stock_name)
        sheet.write(index + 1, 2, year)
 
    book.save(r'E:\绿色认知.xls')
 
 
txt_folder = 'F:\咸鱼数据\文本\年报\TXT'
keywords = ['节能减排', '环保战略', '环保理念', '环境管理机构',   '环保教育', '环保培训', '环境技术开发',   '环境审计', '节能环保', '环保政策', '环保部门', '环保督查', '低碳环保', '环保工作', '环保治理', '环保和环境治理',  '环保设施', '环保相关法律法规', '环保治污']
matchKeyWords(txt_folder, keywords)

04、包含内容

图1.png