Difference between revisions of "GraphsInTables"
Line 37: | Line 37: | ||
"PGgraphmacros.pl", |
"PGgraphmacros.pl", |
||
"MathObjects.pl", |
"MathObjects.pl", |
||
− | "unionTables.pl", |
+ | "unionTables.pl", # or "PGunion.pl", |
); |
); |
||
Line 48: | Line 48: | ||
<p> |
<p> |
||
<b>Initialization:</b> |
<b>Initialization:</b> |
||
− | Be sure to load <code>unionTables.pl</code>. Set <code>$refreshCachedImages=1;</code> if you desire the graphics files to be refreshed each time. |
+ | Be sure to load <code>unionTables.pl</code> (or <code>PGunion.pl</code> which will load it automatically). Set <code>$refreshCachedImages=1;</code> if you desire the graphics files to be refreshed each time. |
</p> |
</p> |
||
</td> |
</td> |
Revision as of 19:46, 11 February 2010
Putting Graphs into Tables
This PG code shows how to put graphs into tables so that they will be displayed compactly and a proper size in both HTML and TeX modes.
- Example 1: Putting a text block and graphics side-by-side using ColumnTable from unionTables.pl
Example 1: Putting a text block and graphics side-by-side using ColumnTable from unionTables.pl
PG problem file | Explanation |
---|---|
DOCUMENT(); loadMacros( "PGstandard.pl", "PGgraphmacros.pl", "MathObjects.pl", "unionTables.pl", # or "PGunion.pl", ); TEXT(beginproblem()); $refreshCachedImages=1; |
Initialization:
Be sure to load |
Context("Numeric"); $a = random(2,3,1); # left x-intercept $b = random(2,4,2); # right x-intercept $c = random(-4,-1,1); # y-intercept $k = -($c)/($a * $b); $A = $k; $B = $k*($a - $b); $C = -($k * $a * $b); $gr = init_graph(-5,-5,5,5,axes=>[0,0],grid=>[10,10]); add_functions($gr, "$A*x**2+$B*x+$C for x in <-5,5> using color:blue and weight:2"); $gr -> lb(new Label ( 4.5,0,'x','black','left','bottom')); $gr -> lb(new Label ( 0.25,8.5,'y','black','left','bottom')); $gr -> lb(new Label ( 0.25,$c,'y = f(x)','black','left','bottom')); |
Setup:
Generate a graph to be included in the main text. This graph is a parabola opening down with roots |
Context()->texStrings; BEGIN_TEXT \{ ColumnTable( "Use the graph to find the missing values. There may be more than one correct answer, in which case you should enter your answers as a comma separated list. If there are no correct answers, enter ${BITALIC}NONE.${EITALIC}". $BR. $BR. "(a) \( f(0) = \) ". ans_rule(7). $BR. $BR. "(b) \( f \big( \) ".ans_rule(7)." \( \big) = 0 \). ", # comma! image(insertGraph($gr), width=>400, height=>400, tex_size=>700). $BR.$BCENTER. "(Click on graph to enlarge)". $ECENTER, # comma! indent => 0, separation => 30, valign => "TOP" ) \} END_TEXT Context()->normalStrings; |
Main Text:
We use Using ColumnTable has two main advantages.
|
$showPartialCorrectAnswers = 1; ANS( List($c)->cmp() ); ANS( List(-$a,$b)->cmp() ); ENDDOCUMENT(); |
Answer Evaluation:
Since there may be multiple answers, we use |