p=function(n){x=1;for(a in 2:(sqrt(n)))if(n%%a==0)x=0;x}
for(i in 2*3:150){cat(i,":",sep="");for(j in seq(3,i/2,2))if(p(j)*p(i-j))cat(" ",j,"+",i-j,sep="");cat("\n")}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).