box_int32 should be box_long ,run ok on 32 bit julia and R,need test it
on 64 bit R and Julia.