1 2 3 4 5
require 'tables/csv' wordVal =: [:+/_64+a.i.] wordValues =: ;wordVal each readcsv 'p042_words.txt' triangleNums =: +/\1+i.20 problem42 =: +/wordValues e."0 _ triangleNums