psample := (79./500)*100; SE := (SDbox/sqrt(500))*100; SDsample := sqrt(.158*(1-.158)); SEest := (SDsample/sqrt(500.))*100; [psample-2*SEest, psample+2*SEest]; [psample-1.8*SEest,psample+1.8*SEest]; p := 100*(172+207.)/500.; SE := sqrt(p*(100-p))/sqrt(500.); se := 100*sqrt(.758*(1-.758))/sqrt(500.); [p-1.75*SE,p+1.75*SE];