Re: preparing multiple choice questions
- To: mathgroup at smc.vnet.net
- Subject: [mg63372] Re: [mg63364] preparing multiple choice questions
- From: Ken Levasseur <klevasseur at mac.com>
- Date: Tue, 27 Dec 2005 04:42:42 -0500 (EST)
- References: <200512260959.EAA20859@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Combinatorica has functions that will do this. For example,
In[9]:=
<< "DiscreteMath`Combinatorica`"
In[10]:=
Last[{Range[30], {}} //.
{{A_, S_} :> ({Complement[A, #1], Append[S, #1]} & )[
RandomKSubset[A, 6]] /; Length[A] >= 6}]
Out[10]=
{{5, 8, 12, 17, 25, 27}, {15, 16, 22, 24, 28, 29},
{2, 4, 9, 13, 18, 20}, {1, 6, 7, 19, 23, 26},
{3, 10, 11, 14, 21, 30}}
There is probably a more direct way to do this,.
Ken Levasseur
UMass Lowell
On Dec 26, 2005, at 4:59 AM, Baris Erbas wrote:
>
> Dear Mathematica Users,
>
> I have been trying to prepare a test of 30 question with multiple
> choices
> ranging from a-e.
>
> 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.
>
> I tried to use Random with Table however it doesnt produce equal
> number of
> correct answers. I also tried to look into the Statistical packages.
>
> Is there a way of doing this in Mathematica? Could you please
> froward me to
> a link if you already know one?
>
>
>
> All the best
>
>
>
> Baris Erbas
>
>
- References:
- preparing multiple choice questions
- From: "Baris Erbas" <berbas@anadolu.edu.tr>
- preparing multiple choice questions