Hoja de preparación de datos

data mycas.getStarted; call streaminit(123); do i = 1 to 100; x1 = rand('UNIFORM'); x2 = rand('UNIFORM'); x3 = rand('UNIFORM'); if (i <= 50) then x4 = 'A'; else x4 = 'B'; p = 1 / (1 + exp(-(x1 - 0.5*x2 + 0.2*x3))); y = rand('BERNOULLI', p); output; end; run; proc cas; bart.bartProbit table={name='getStarted'}, model={depVars={{name='y', levelType='BINARY'}}, effects={{vars={'x1', 'x2', 'x3', 'x4'}}}}, store={name='my_bart_model', replace=true}; quit;