K1(x)−ln(x)I1(x)−1=xR(x2);I1(x)=x2(1+12[x2]2+[x2]4R([x2]2));x<1