2001～2023年上市公司供应商、客户与绿色专利匹配结果（WIPO标准）

1292 字 约 4 分钟 数据资料 专利上市公司数据匹配

今天给大家分享一份 2001～2023 年上市公司供应商、客户与绿色专利（WIPO标准）匹配结果。该数据由 RStata 数据中心将《2001～2023 年上市公司供应商及客户专利申请与授权信息（含引用与被引用信息）》与《WIPO 绿色专利筛选对照表》中的专利编号（newipzlid）清单进行匹配得到，时间范围为 2001～2023 年。

2001~2023 年上市公司供应商及客户专利申请与授权信息：https://rstata.duanshu.com/#/brief/course/8a2dad50eaf1460289799032a81914ac

1985～2024 年绿色专利申请与授权数据（WIPO标准）：https://rstata.duanshu.com/#/course/e2fbfb44b58b4d48a1cf7ba202587bac

数据来源与处理方法

上市公司供应商、客户的专利申请与授权信息文件体量巨大（数十 GB），无法一次性读入内存，因此数据处理采用流式匹配的思路：

  1. 载入专利编号清单：从专利筛选对照表中读取 WIPO 标准绿色专利的 newipzlid 编号清单（每个 newipzlid 对应一个专利）；
  2. 流式读取匹配：使用 R 语言 readr::read_csv_chunked 分块流式读取供应商、客户两份大表，每次仅驻留一个 chunk（20 万行），按 newipzlid 是否命中清单将匹配行追加写入中间文件，内存占用保持恒定；
  3. 写出 Stata 数据：将中间文件读入后写出为 .dta 格式，数据标签为 数据处理：微信公众号 RStata。

字段全部以字符型读写，以完整保留带前导零的编码（如股票代码 000825）及长文本（摘要、权利要求等）；Stata 中可用 destring 处理数值列。

数据概览

为了方便大家使用，数据按照内容拆分成三部分存放：

第一部分：上市公司供应商与绿色专利（WIPO标准）匹配结果（每条观测值对应一条专利）：

  • 2001～2023年上市公司供应商与绿色专利（WIPO标准）匹配结果.dta

第二部分：上市公司客户与绿色专利（WIPO标准）匹配结果：

  • 2001～2023年上市公司客户与绿色专利（WIPO标准）匹配结果.dta

数据中包含 newipzlid 变量，可以直接和专利数据使用该变量匹配；省、省代码、市、市代码、县、县代码是根据 2021 年行政区划判断得到。

第三部分：WIPO 绿色专利筛选结果：

  • WIPO绿色专利筛选结果.dta（专利编号 newipzlid 与 WIPO 绿色专利分类的对照关系）

数据预览如下：

图表展示

下图展示了 2001～2023 年上市公司供应商与客户的绿色专利（WIPO标准）申请数量年度趋势：

下图展示了供应商与客户绿色专利（WIPO标准）的省份分布（地图中为两者合计）：

下图展示了供应商与客户的专利类型构成：

处理代码

下面展示匹配过程的核心代码（R 语言，流式读取 + 按 newipzlid 匹配）：

# 载入 WIPO 绿色专利 newipzlid 编号清单
x <- fread(f, colClasses = "character")[[1]]
id_set <- unique(x[!is.na(x) & x != ""])

# 流式读取供应商/客户大表，按 newipzlid 命中情况写出匹配行
cb <- function(x, pos) {
    x <- as.data.table(x)
    m <- x[["newipzlid"]] %in% id_set
    if (any(m)) fwrite(x[m], out_path, append = TRUE, col.names = FALSE)
    NULL
}
read_csv_chunked(input_csv, callback = cb, chunk_size = 200000,
                 col_types = cols(.default = col_character()))

# 写出 Stata 数据
write_dta(dt, out_path, version = 14, label = "数据处理：微信公众号 RStata")

注意事项

在计算专利数量时需要注意，专利数据中很多专利同时存在申请和授权记录，统计时应先去除重复：可先去除公开公告号中的 A、B、U、S（A 代表发明专利申请公开，B 代表发明专利授权公告，U 代表实用新型专利授权公告，S 代表外观设计专利授权公告），再使用 duplicates drop 去重。

数据引用格式

由于该数据包含较多 RStata 处理的内容，在研究中使用该数据请使用清晰的方式注明数据来源于 RStata 或者 RStata 数据中心，并使用如下格式引用：

RStata 数据中心: 2001～2023年上市公司供应商、客户与绿色专利匹配结果（WIPO标准）. 2026. https://tidyfriday.cn/rsdb2/

英文文献可以使用下面的格式引用：

RStata Data Center: Matching Results of Listed Company Suppliers and Customers with Green Patents (WIPO Standard), 2001–2023. 2026. https://tidyfriday.cn/rsdb2/

关联课程/数据推荐

2001～2023 年上市公司供应商及客户专利申请与授权信息：https://rstata.duanshu.com/#/course/8a2dad50eaf1460289799032a81914ac

1985～2024 年绿色专利申请与授权数据（WIPO标准）：https://rstata.duanshu.com/#/course/e2fbfb44b58b4d48a1cf7ba202587bac

1985～2024 年上市公司与 WIPO 绿色专利数据匹配结果：https://rstata.duanshu.com/#/course/9ae2d685aa3445da8aca82df3456f9a5

1985～2024 年上市公司与专利数据匹配结果（版本3， 含申请、授权信息）：https://rstata.duanshu.com/#/course/04100321f88b411f90429be934934bff

1985～2024 年专利申请与授权数据（版本 3，含申请人所处的省市区县）：https://rstata.duanshu.com/#/course/2397451274c546d3a36e156ffc865988

点击这里跳转到 RStata 短书平台获取附件：2001～2023年上市公司供应商、客户与绿色专利匹配结果（WIPO标准）

相关文章

评论