# Datenverarbeitung mit Matrizen

## Problembeschreibung

******************************************
Dokumentnummer: D1151
Quelle: Maxima-Dokumentation
******************************************

Ein gespeicherter Adressdatenbestand, bei dem alle Datensätze
gleich lang sind (kein leeres Datenfeld!), soll ausgewertet werden.

Exemplarisch sollen die Häufigkeiten von Vornamen ermittelt werden.

## Problemlösung

UNTERPROGRAMME

load(descriptive)$

load(numericalio)$

EINGABE

s1:read_matrix (file_search("adressen.data"));

n:length(s1);

zunamen:makelist(s1[i][1],i,1,n);

vornamen:makelist(s1[i][2],i,1,n);

strassen:makelist(s1[i][3],i,1,n);

hausnummern:makelist(s1[i][4],i,1,n);

postleitzahlen:makelist(s1[i][5],i,1,n);

orte:makelist(s1[i][6],i,1,n);

vornamen_haeufigkeit:discrete_freq(vornamen);

ausgabe:[transpose(vornamen_haeufigkeit[1]),transpose(vornamen_haeufigkeit[2])]$

AUSGABE

print(ausgabe)$