fork download
copy 
  1. # data lanudry
  2.  
  3. { second[$1] = second[$1] "," $2; third[$1] = third[$1] "," $3 }
  4. END { for (i in second) print i, substr(second[i],2), substr(third[i],2) }
Success #stdin #stdout 0s 23336KB
comments (?)
stdin
copy 
AAKRKA HIST1H1B AAGAGAAKRKATGPP
AAKRKA HIST1H1E RKSAGAAKRKASGPP
AAKRLN ACAT1 LMTADAAKRLNVTPL
AAKRLN SUCLG2 NEALEAAKRLNAKEI
AAKRLR GTF2F1 VSEMPAAKRLRLDTG
AAKRMA VCL NDIIAAAKRMALLMA
AAKRPL WIZ YLGSVAAKRPLQEDR
AAKRQK MTA2 SSSQPAAKRQKLNPA
stdout
copy 
AAKRLN ACAT1,SUCLG2 LMTADAAKRLNVTPL,NEALEAAKRLNAKEI
AAKRMA VCL NDIIAAAKRMALLMA
AAKRQK MTA2 SSSQPAAKRQKLNPA
AAKRPL WIZ YLGSVAAKRPLQEDR
AAKRLR GTF2F1 VSEMPAAKRLRLDTG
AAKRKA HIST1H1B,HIST1H1E AAGAGAAKRKATGPP,RKSAGAAKRKASGPP
https://ideone.com/sbgLNk
language:
AWK (gawk 4.2.1)
created:
5 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!