Re: Länge einer IntervalUnion (eines Intervals)

[Stefan Welke <spwelke@XXXXXXX.com>]

su.krause@XXXXXXX.ch wrote:

> Als ordentlicher Einzeiler, ohne Zwischenvariable  o:
>
> Dot[#, Table[(-1)^j, {j, Length[#]}]] &[Flatten[List @@ Interval[{3, 
> 6}, {7, 26}, {29, 30}]]]
>
> Gruss
> Udo.
Noch ein Einzeiler:

In[1]:  L[v_]:=((Last[#]-First[#])&/@v)/.List->Plus;

In[2]:   L[{{7,13},{15,16},{22,30},{55,56}}]

Out[2]: 16

MfG

S. Welke