Create observeEvidence.pgmNode.factor.R