AskOverflow.Dev

AskOverflow.Dev Logo AskOverflow.Dev Logo

AskOverflow.Dev Navigation

  • 主页
  • 系统&网络
  • Ubuntu
  • Unix
  • DBA
  • Computer
  • Coding
  • LangChain

Mobile menu

Close
  • 主页
  • 系统&网络
    • 最新
    • 热门
    • 标签
  • Ubuntu
    • 最新
    • 热门
    • 标签
  • Unix
    • 最新
    • 标签
  • DBA
    • 最新
    • 标签
  • Computer
    • 最新
    • 标签
  • Coding
    • 最新
    • 标签
主页 / unix / 问题 / 569709
Accepted
jesse_b
jesse_b
Asked: 2020-02-26 13:39:16 +0800 CST2020-02-26 13:39:16 +0800 CST 2020-02-26 13:39:16 +0800 CST

对 csv 列中的值求和

  • 772

我有几个相当大的 csv 文件,我需要将每列的值求和并转置列标题。

样本 csv:

col1,col2,col3
enabled,disabled,active
disabled,disabled,enabled
N/A,enabled,active
enabled,N/A,disabled

期望的输出:

col1,2 enabled,1 disabled,1 N/A
col2,1 enabled,2 disabled,1 N/A
col3,1 enabled,1 disabled,2 active

实际的 csv 具有更多的列和行,因此最好能够自动迭代文件。我可能会想出一些 awk 程序的 hack 工作来一次处理一列,但我希望能够一次处理整个文件并且不知道从哪里开始。输出不需要采用我所包含的确切格式,但至少相似。

awk text-processing
  • 2 2 个回答
  • 1150 Views

2 个回答

  • Voted
  1. Best Answer
    Ed Morton
    2020-02-26T14:02:40+08:002020-02-26T14:02:40+08:00
    $ cat tst.awk
    BEGIN { FS=OFS="," }
    NR==1 { numRows = split($0,keys); next }
    {
        for (i=1; i<=NF; i++) {
            sum[i,$i]++
            vals[$i]
        }
    }
    END {
        for (rowNr=1; rowNr<=numRows; rowNr++) {
            printf "%s", keys[rowNr]
            for (val in vals) {
                printf "%s%d %s", OFS, sum[rowNr,val], val
            }
            print ""
        }
    }
    
    $ awk -f tst.awk file
    col1,1 disabled,2 enabled,1 N/A,0 active
    col2,2 disabled,1 enabled,1 N/A,0 active
    col3,1 disabled,1 enabled,0 N/A,2 active
    

    或者可能更有用:

    $ cat tst.awk
    BEGIN { FS=OFS="," }
    NR==1 { numRows = split($0,keys); next }
    {
        for (i=1; i<=NF; i++) {
            sum[i,$i]++
            vals[$i]
        }
    }
    END {
        printf "%s", "key"
        for (val in vals) {
            printf "%s%s", OFS, val
        }
        print ""
    
        for (rowNr=1; rowNr<=numRows; rowNr++) {
            printf "%s", keys[rowNr]
            for (val in vals) {
                printf "%s%d", OFS, sum[rowNr,val]
            }
            print ""
        }
    }
    
    $ awk -f tst.awk file
    key,disabled,enabled,N/A,active
    col1,1,2,1,0
    col2,2,1,1,0
    col3,1,1,0,2
    
    • 2
  2. steeldriver
    2020-02-26T16:15:27+08:002020-02-26T16:15:27+08:00

    您可以与米勒非常接近:

    mlr --icsvlite --odkvp put -q 'for(k,v in $*) { @count[k][v] += 1; } end {emit @count,"col"}' sample.csv
    col=col1,enabled=2,disabled=1,N/A=1
    col=col2,disabled=2,enabled=1,N/A=1
    col=col3,active=2,enabled=1,disabled=1
    
    • 1

相关问题

  • 重新排列字母并比较两个单词

  • 在awk中的两行之间减去相同的列

  • 多行文件洗牌

  • 如何更改字符大小写(从小到大,反之亦然)?同时[重复]

Sidebar

Stats

  • 问题 205573
  • 回答 270741
  • 最佳答案 135370
  • 用户 68524
  • 热门
  • 回答
  • Marko Smith

    模块 i915 可能缺少固件 /lib/firmware/i915/*

    • 3 个回答
  • Marko Smith

    无法获取 jessie backports 存储库

    • 4 个回答
  • Marko Smith

    如何将 GPG 私钥和公钥导出到文件

    • 4 个回答
  • Marko Smith

    我们如何运行存储在变量中的命令?

    • 5 个回答
  • Marko Smith

    如何配置 systemd-resolved 和 systemd-networkd 以使用本地 DNS 服务器来解析本地域和远程 DNS 服务器来解析远程域?

    • 3 个回答
  • Marko Smith

    dist-upgrade 后 Kali Linux 中的 apt-get update 错误 [重复]

    • 2 个回答
  • Marko Smith

    如何从 systemctl 服务日志中查看最新的 x 行

    • 5 个回答
  • Marko Smith

    Nano - 跳转到文件末尾

    • 8 个回答
  • Marko Smith

    grub 错误:你需要先加载内核

    • 4 个回答
  • Marko Smith

    如何下载软件包而不是使用 apt-get 命令安装它?

    • 7 个回答
  • Martin Hope
    user12345 无法获取 jessie backports 存储库 2019-03-27 04:39:28 +0800 CST
  • Martin Hope
    Carl 为什么大多数 systemd 示例都包含 WantedBy=multi-user.target? 2019-03-15 11:49:25 +0800 CST
  • Martin Hope
    rocky 如何将 GPG 私钥和公钥导出到文件 2018-11-16 05:36:15 +0800 CST
  • Martin Hope
    Evan Carroll systemctl 状态显示:“状态:降级” 2018-06-03 18:48:17 +0800 CST
  • Martin Hope
    Tim 我们如何运行存储在变量中的命令? 2018-05-21 04:46:29 +0800 CST
  • Martin Hope
    Ankur S 为什么 /dev/null 是一个文件?为什么它的功能不作为一个简单的程序来实现? 2018-04-17 07:28:04 +0800 CST
  • Martin Hope
    user3191334 如何从 systemctl 服务日志中查看最新的 x 行 2018-02-07 00:14:16 +0800 CST
  • Martin Hope
    Marko Pacak Nano - 跳转到文件末尾 2018-02-01 01:53:03 +0800 CST
  • Martin Hope
    Kidburla 为什么真假这么大? 2018-01-26 12:14:47 +0800 CST
  • Martin Hope
    Christos Baziotis 在一个巨大的(70GB)、一行、文本文件中替换字符串 2017-12-30 06:58:33 +0800 CST

热门标签

linux bash debian shell-script text-processing ubuntu centos shell awk ssh

Explore

  • 主页
  • 问题
    • 最新
    • 热门
  • 标签
  • 帮助

Footer

AskOverflow.Dev

关于我们

  • 关于我们
  • 联系我们

Legal Stuff

  • Privacy Policy

Language

  • Pt
  • Server
  • Unix

© 2023 AskOverflow.DEV All Rights Reserve