Anonymous user
Text processing/2: Difference between revisions
→{{header|Mathematica}}
m (→{{header|Go}}: library change) |
|||
Line 848:
</pre>
=={{header|Mathematica}}==
<lang Mathematica>data = Import["Readings.txt","TSV"]; Print["duplicated dates: "];
Select[Tally@data[[;;,1]], #[[2]]>1&][[;;,1]]//Column
Print["number of good records: ", Count[(Times@@#[[3;;All;;2]])& /@ data, 1],
" (out of a total of ", Length[data], ")"]</lang>
<pre>duplicated dates:
1990-03-25
1991-03-31
1992-03-29
1993-03-28
1995-03-26
number of good records: 5017 (out of a total of 5471)</pre>
=={{header|OCaml}}==
|