I have run these codes but in the last step the choice sets are not coming in blocks %MktRuns(3 3 3 3 2 2) %MktEx (3 3 3 3 2 2, n=36) proc print; run; %macro res; do i = 1 to nalts; do k = i + 1 to nalts; if all(x[i,] >= x[k,]) then bad = bad + 1; /* alt i dominates alt k */ if all(x[k,] >= x[i,]) then bad = bad + 1; /* alt k dominates alt i */ end; end; %mend; %choiceff(data=design, model=class(x1-x6/sta), nsets=36, flags=2, seed=123, options=relative, beta=zero); proc print; var x1-x6; id set; by set; run; proc format; value x1f 1 = 'Crop-specific advice' 2 = 'Weather forecasting' 3 = 'Market price and trend information'; value x2f 1 = 'SMS' 2 = 'Internet' 3 = 'Face to face'; value x3f 1 = 'Within 24 hours' 2 = 'Weekly' 3 = 'Monthly updates'; value x4f 1 = 'Free of cost' 2 = '₹100 per month' 3 = '₹300 per month'; value x5f 1 = 'Government extension services' 2 = 'Private extension services' ; value x6f 1 = 'General' 2 = 'Based on farm-level data'; run; proc print label; label x1 = 'Type of Service' x2 = 'Service Delivery Mode' x3 = 'Response Time' x4 = 'Cost of Service'; x5 = 'Service Provider Type' x6 = 'Customization of Advice' format x1 x1f. x2 x2f. x3 x3f. x4 x4f. x5 x5f. x6 x6f. ; by set; id set; var x1-x6; title "Formatted Choice Sets with Labels"; run; proc print data=bestcov label; title ’Variance-Covariance Matrix’; id __label; label __label = ’00’x; var x:; run; %mktblock(data=best, nblocks=4, out=blocked_design, seed=114) title; %mktdups(generic, data=best, factors=x1-x6, nalts=2)
... View more
