Re: preparing multiple choice questions
- To: mathgroup at smc.vnet.net
- Subject: [mg63378] Re: preparing multiple choice questions
- From: "Baris Erbas" <berbas at anadolu.edu.tr>
- Date: Tue, 27 Dec 2005 06:15:45 -0500 (EST)
- Organization: Anadolu University
- Sender: owner-wri-mathgroup at wolfram.com
Thank you very much all, all the solutions work quite nicely. I will read all the help about the functions you used. regards baris >-----Original Message----- >From: ggroup at sarj.ca [mailto:ggroup at sarj.ca] To: mathgroup at smc.vnet.net >Sent: 27 Aralýk 2005 Salý 02:06 >To: Baris Erbas >Cc: mathgroup at smc.vnet.net >Subject: [mg63378] Re: preparing multiple choice questions > >On Monday, December 26, 2005 at 04:59 GMT -0500, Baris Erbas wrote: > ><snip> >> I want to automatically assign the question numbers and and the >> correct answers using mathematica. All correct answers should be in >> equal quantity, i.e. 6 a, 6 b, . 6 e. ><snip> >> Is there a way of doing this in Mathematica? > >Try the RandomPermutation function in the Combinatorica package: > ><< DiscreteMath`Combinatorica` >ans = Table[Mod[i, 5], {i, 30}] /. {1 -> a, 2 -> b, 3 -> c, 4 -> d, 0 -> e} >randAns = RandomPermutation[ans]