PadeApproximant[Log[x]Log[x+1],{x,Log[10],{2,2}}]