f:=method(n,for(a,x:=2,n/2,n%a>0or x=0);x) for(i,6,300,2,write(i,":");for(j,3,i/2,f(j)*f(i-j)<1or write(" ",j,"+",i-j));" "print)