función factorial con Include