Writing BUGS Code In R