MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

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
>
>


  • Prev by Date: Re: Re: Questions regarding MatrixExp, and its usage
  • Next by Date: Re: preparing multiple choice questions
  • Previous by thread: preparing multiple choice questions
  • Next by thread: Re: preparing multiple choice questions