Difference between revisions of "TableOfValues1"

From WeBWorK_wiki
Jump to navigation Jump to search
Line 65: Line 65:
 
<pre>
 
<pre>
 
Context("Numeric");
 
Context("Numeric");
 
@answer = ();
 
   
 
$f = Formula("3^(-x)");
 
$f = Formula("3^(-x)");
   
  +
@answer = ();
 
foreach my $i (0..2) {
 
foreach my $i (0..2) {
 
$answer[$i] = $f->eval(x=>$i);
 
$answer[$i] = $f->eval(x=>$i);
Line 78: Line 77:
 
<p>
 
<p>
 
<b>Setup:</b>
 
<b>Setup:</b>
  +
We create an empty array <code>@answer</code> and use a foreach loop to simplify filling it with values.
 
</p>
 
</p>
 
</td>
 
</td>

Revision as of 19:40, 1 December 2010

Fill in a Table of Values for a Function

This PG code shows how to create a table with answer blanks in it.

  • Download file: File:TableOfValues1.txt (change the file extension from txt to pg when you save it)
  • File location in NPL: NationalProblemLibrary/FortLewis/Authoring/Templates/Precalc/TableOfValues1.pg

Templates by Subject Area

PG problem file Explanation

Problem tagging data

Problem tagging:

DOCUMENT();

loadMacros(
"PGstandard.pl",
"MathObjects.pl",
"AnswerFormatHelp.pl",
);

TEXT(beginproblem());

Initialization:

Context("Numeric");

$f = Formula("3^(-x)");

@answer = ();
foreach my $i (0..2) {
  $answer[$i] = $f->eval(x=>$i);
}

Setup: We create an empty array @answer and use a foreach loop to simplify filling it with values.

Context()->texStrings;
BEGIN_TEXT
If \( f(x) = $f \), fill in the table of values with numbers.
\{ AnswerFormatHelp("numbers") \}
$PAR
$BCENTER
\{ 
begintable(5) .
row( "\(x = \)", "0", "1", "2" ) .
row( "\(f(x) = \)", ans_rule(5), ans_rule(5), ans_rule(5) ) .
endtable(); 
\}
$ECENTER
END_TEXT
Context()->normalStrings;

Main Text: Notice that the table is inside a Perl code block \{ \} and that there are periods at the end of each line (after each of the subroutines begintable(num cols) and row( )) except for the last line. These periods are Perl's string concatenation operator.

$showPartialCorrectAnswers = 1;

foreach my $i (0..2) {
  ANS( $answer[$i]->cmp() );
}

Answer Evaluation:

Context()->texStrings;
BEGIN_SOLUTION
${PAR}SOLUTION:${PAR}
Solution explanation goes here.
END_SOLUTION
Context()->normalStrings;

COMMENT('MathObject version.');

ENDDOCUMENT();

Solution:

Templates by Subject Area