Create factorial.m