function DAeffR = effi(tsInt)

length = uint32(size(tsInt,1))
R0 = input('Förster Radius ');
n = input('Zetimittel ');
   for i=1:n
       DAeffR(i,1) = tsInt(i,2)/(tsInt(i,1)+tsInt(i,2));
       DAeffR(i,2) = (R0.^6/DAeffR(i,1)-R0.^6).^(1/6);
   end
       