%datei einlesen

Daten=[
    1,2,3,4,5,6;
    7,8,9,10,11,12;
    13,14,15,16,17,19];

%Vorlage erstellen
T = readtable('Mappe1.csv')


n = 3

%ID
for i=1:n
    for j=1:6
     T((i*6)+j+1,1)=T(j+1,1)
    end
end

%point in time
for i=1:n   
    for j=1:6
    T{(i*6)+j+1,2}=i+1;
    end
end

%Daten eintragen in "T" aus "Daten"
for i=1:n   
    for j=1:6
    T{(i*6)+j+1,6}=Daten(i,j)
    end
end


%daten schreiben
writetable(T, 'Map2.csv')


%funktioniert nicht:
% dlmwrite('pos2.csv', T,'delimiter','\t')
% 
% dlmwrite('pos1.csv', T)
% 
% csvwrite('egal.csv',T)