p eval$<.read.tr$/,"+"