(***********************************************************************

                    Mathematica-Compatible Notebook

This notebook can be used on any computer system with Mathematica 4.0,
MathReader 4.0, or any compatible application. The data for the notebook 
starts with the line containing stars above.

To get the notebook into a Mathematica-compatible application, do one of 
the following:

* Save the data starting with the line of stars above into a file
  with a name ending in .nb, then open the file inside the application;

* Copy the data starting with the line of stars above to the
  clipboard, then use the Paste menu command inside the application.

Data for notebooks contains only printable 7-bit ASCII and can be
sent directly in email or through ftp in text mode.  Newlines can be
CR, LF or CRLF (Unix, Macintosh or MS-DOS style).

NOTE: If you modify the data for this notebook not in a Mathematica-
compatible application, you must delete the line below containing the 
word CacheID, otherwise Mathematica-compatible applications may try to 
use invalid cache data.

For more information on notebooks and Mathematica-compatible 
applications, contact Wolfram Research:
  web: http://www.wolfram.com
  email: info@wolfram.com
  phone: +1-217-398-0700 (U.S.)

Notebook reader applications are available free of charge from 
Wolfram Research.
***********************************************************************)

(*CacheID: 232*)


(*NotebookFileLineBreakTest
NotebookFileLineBreakTest*)
(*NotebookOptionsPosition[     19495,        511]*)
(*NotebookOutlinePosition[     20206,        536]*)
(*  CellTagsIndexPosition[     20162,        532]*)
(*WindowFrame->Normal*)



Notebook[{
Cell[TextData[StyleBox["\:7b2c 3 \:56de  1 \:6642\:9650\:76ee",
  FontSize->14,
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 1]]], "Text",
  ShowCellBracket->False,
  CellMargins->{{10, Inherited}, {0, 2}}],

Cell[CellGroupData[{

Cell["\:300e\:95a2\:6570\:3092\:63cf\:753b\:3059\:308b Part 1\:300f", "Title",
  ShowCellBracket->False,
  CellMargins->{{2, 2}, {Inherited, 2}},
  TextAlignment->Center],

Cell[TextData[{
  "\:3053\:306e\:30ce\:30fc\:30c8\:30d6\:30c3\:30af\:3067\:306f\:95a2\:6570\
\:3092\:63cf\:753b\:3059\:308b\:65b9\:6cd5\:306b\:3064\:3044\:3066\:5b66\:7fd2\
\:3057\:307e\:3059\:ff0e\:95a2\:6570\:306e\:63cf\:753b\:3092\:884c\:3046\:306b\
\:306f",
  StyleBox["Plot(\:30d7\:30ed\:30c3\:30c8)",
    FontFamily->"Courier New"],
  "\:3068\:3044\:3046\:95a2\:6570\:3092\:4f7f\:3044\:307e\:3059\:ff0e"
}], "Text",
  ShowCellBracket->False],

Cell[CellGroupData[{

Cell["\:30d7\:30ed\:30c3\:30c8\:95a2\:6570\:306e\:57fa\:672c", "Section"],

Cell[TextData[{
  StyleBox["\:307e\:305a\:306f\:3068\:3082\:3042\:308cPlot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:3092\:4f7f\:3063\:305f\:4f8b\:3092\:898b\:3066\:307f\:307e\
\:3057\:3087\:3046\:ff0e\:6b21\:306e\:30bb\:30eb\:3092\:5b9f\:884c\:3057\:3066\
\:307f\:3066\:304f\:3060\:3055\:3044\:ff0e"
}], "Text"],

Cell[BoxData[
    \(Plot[{x\^2, 2  x\^2}, {x, \(-2\), 
        2}, \[IndentingNewLine]PlotStyle \[Rule] {RGBColor[1, 0, 0], 
          RGBColor[0, 1, 0]}, \[IndentingNewLine]AxesLabel \[Rule] {x, 
          y}\[IndentingNewLine]]\)], "Input"],

Cell["\<\
\:304d\:308c\:3044\:306a\:653e\:7269\:7dda\:304c\:63cf\:3051\:307e\:3057\:305f\
\:304b\:ff1f \:3053\:306e\:30ce\:30fc\:30c8\:30d6\:30c3\:30af\:3067\:306f\
\:3053\:306e\:3088\:3046\:306a2\:6b21\:5143\:306e\:30b0\:30e9\:30d5\:30a3\
\:30c3\:30af\:30b9\:306e\:63cf\:753b\:65b9\:6cd5\:306b\:3064\:3044\:3066\:5b66\
\:7fd2\:3057\:3066\:3044\:304d\:307e\:3059\:ff0e\
\>", "Text"],

Cell[TextData[{
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306e\:4f7f\:3044\:65b9\:306f\:4ee5\:4e0b\:306e\:66f8\:5f0f\
\:306b\:5f93\:3044\:307e\:3059\:ff0e"
}], "Text"],

Cell["\<\
Plot[ \:95a2\:6570, {\:5909\:6570, \:7bc4\:56f2\:4e0b\:9650, \:7bc4\:56f2\
\:4e0a\:9650}, \:30aa\:30d7\:30b7\:30e7\:30f3 ]\
\>", "Program",
  CellFrame->True,
  Background->GrayLevel[0.996109]],

Cell["\<\
\:30aa\:30d7\:30b7\:30e7\:30f3\:3068\:306f\:63cf\:753b\:3059\:308b\:95a2\:6570\
\:306e\:5f62\:72b6\:3084\:8272\:306a\:3069\:3092\:6307\:5b9a\:3059\:308b\:305f\
\:3081\:306e\:3082\:306e\:3067\:3059\:ff0e\
\>", "Text"],

Cell[TextData[{
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306e\:4e00\:756a\:30b7\:30f3\:30d7\:30eb\:306a\:4f7f\:3044\
\:65b9\:306f\:6b21\:306e\:3088\:3046\:306b\:306a\:308a\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    \(Plot[x\^2, {x, \(-1\), 1}]\)], "Input"],

Cell["\<\
\:3053\:308c\:306f\:63cf\:753b\:3059\:308b\:95a2\:6570\:3068\:305d\:306e\:63cf\
\:753b\:306e\:305f\:3081\:306e\:7bc4\:56f2\:3092\:6307\:5b9a\:3057\:305f\:3060\
\:3051\:3067\:ff0c\:6700\:521d\:306e\:4f8b\:3067\:6307\:5b9a\:3055\:308c\:3066\
\:3044\:308b\:3088\:3046\:306a\:30aa\:30d7\:30b7\:30e7\:30f3\:985e\:306f\:4f55\
\:3082\:6307\:5b9a\:3057\:3066\:3044\:307e\:305b\:3093\:ff0e\
\>", "Text"],

Cell[TextData[{
  "\:8907\:6570\:306e\:95a2\:6570\:3092\:3044\:3063\:3057\:3087\:306b\:63cf\
\:753b\:3059\:308b\:5834\:5408\:306f\:ff0c",
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306e\:6700\:521d\:306e\:5f15\:6570\:306b\:95a2\:6570\:306e\
\:30ea\:30b9\:30c8\:3092\:6307\:5b9a\:3057\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", " ", 
      RowBox[{
        StyleBox[\({x\^2, 2  x\^2}\),
          FontColor->RGBColor[1, 0, 0]], ",", " ", \({x, \(-2\), 2}\)}], 
      "]"}]], "Input"],

Cell[TextData[{
  "\:3053\:306e\:30b0\:30e9\:30d5\:3067\:306f\:95a2\:6570\:306e\:5927\:307e\
\:304b\:306a\:5f62\:306f\:308f\:304b\:308b\:306e\:3067\:3059\:304c\:ff0c\:8907\
\:6570\:6307\:5b9a\:3057\:305f\:95a2\:6570\:306e\:3069\:3061\:3089\:304c ",
  Cell[BoxData[
      \(TraditionalForm\`x\^2\)]],
  "\:306a\:306e\:304b ",
  Cell[BoxData[
      \(TraditionalForm\`2  x\^2\)]],
  "\:306a\:306e\:304b\:304c\:3088\:304f\:308f\:304b\:308a\:307e\:305b\:3093\
\:ff0e \:305d\:306e\:3088\:3046\:306a\:3068\:304d\:306f\:63cf\:753b\:3059\
\:308b\:95a2\:6570\:306b\:8272\:3092\:4ed8\:3051\:3066\:5206\:3051\:308b\:3053\
\:3068\:304c\:3067\:304d\:307e\:3059\:ff0e"
}], "Text"],

Cell[TextData[{
  "\:3055\:3063\:305d\:304f\:95a2\:6570\:306b\:8272\:3092\:4ed8\:3051\:308b\
\:305f\:3081\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:6307\:5b9a\:3057\:307e\
\:3057\:3087\:3046\:ff0e",
  Cell[BoxData[
      \(TraditionalForm\`x\^2\)]],
  "\:306f\:8d64\:8272\:3067\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`2  x\^2\)]],
  "\:306f\:307f\:3069\:308a\:8272\:3067\:7dda\:3092\:63cf\:753b\:3059\:308b\
\:3088\:3046\:306b\:6307\:5b9a\:3057\:307e\:3059\:ff0e\:8d64\:5b57\:3067\:8a18\
\:8ff0\:3057\:3066\:3044\:308b\:90e8\:5206\:304c\:8272\:306e\:6307\:5b9a\:3067\
\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", " ", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(PlotStyle \[Rule] {RGBColor[1, 0, 0], RGBColor[0, 1, 0]}\),
          
          FontColor->RGBColor[1, 0, 0]]}], "\[IndentingNewLine]", 
      "]"}]], "Input"],

Cell[TextData[{
  StyleBox["\:4e00\:756a\:6700\:5f8c\:306e\:90e8\:5206\:306bPlotStyle",
    FontFamily->"Courier New"],
  "\:3068\:3044\:3046\:8a18\:8ff0\:3092\:3057\:3066\:3044\:307e\:3059\:ff0e\
\:3053\:306e\:3088\:3046\:306a",
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306e3\:756a\:76ee\:4ee5\:964d\:306b\:8a18\:8ff0\:3059\:308b\
\:63cf\:753b\:306e\:305f\:3081\:306e\:8a2d\:5b9a\:3092\:300e\:95a2\:6570\:306e\
\:30aa\:30d7\:30b7\:30e7\:30f3\:300f\:3068\:3044\:3044\:307e\:3059\:ff0e\:30aa\
\:30d7\:30b7\:30e7\:30f3\:306f\:5927\:62b5\:ff0c\:77e2\:5370\:8a18\:53f7\:300e\
\[Rule]\:300f\:3067\:8a2d\:5b9a\:3057\:307e\:3059\:ff0e\:77e2\:5370\:8a18\
\:53f7\:306f\:300e\:2015 \:300f+\:300e \:ff1e\:300f(\:30cf\:30a4\:30d5\:30f3\
\:3068\:5927\:5c0f\:8a18\:53f7)\:3092\:5165\:529b\:3057\:3066\:305d\:306e\
\:76f4\:5f8c\:306b\:4f55\:304b\:3057\:3089\:6587\:5b57\:5217\:3092\:5165\:529b\
\:3059\:308b\:3068\:81ea\:52d5\:7684\:306b\:77e2\:5370\:8a18\:53f7\:306b\:5909\
\:63db\:3055\:308c\:307e\:3059\:ff0e"
}], "Text"],

Cell[TextData[{
  StyleBox["PlotStyle",
    FontFamily->"Courier New"],
  "\:3068\:77e2\:5370\:8a18\:53f7\:306e\:5f8c\:306b\:306f ",
  StyleBox["{RGBColor[1,0,0], RGBColor[0,1,0]}",
    FontFamily->"Courier New"],
  " \:3068\:3044\:3046\:8a18\:8ff0\:3092\:3057\:3066\:3044\:307e\:3059\:ff0e",\

  StyleBox["RGBColor",
    FontFamily->"Courier New"],
  "\:3068\:3044\:3046\:306e\:306f\:8272\:3092\:8868\:3059\:305f\:3081\:306e\
\:95a2\:6570\:3067 R:\:8d64\:3001G:\:7dd1\:3001B:\:9752\:306e3\:8272\:3092\
\:305d\:308c\:305e\:308c0\:304b\:30891\:307e\:3067\:306e\:5024\:3067\:6307\
\:5b9a\:3057\:307e\:3059\:ff0e\:4f8b\:3048\:3070\:3001",
  StyleBox["RGBColor[1,0,0]",
    FontFamily->"Courier New"],
  "\:306f\:8d64\:8272\:3092\:8868\:3057\:3066\:3044\:3066\:ff0c",
  StyleBox["RGBColor[0,1,0]",
    FontFamily->"Courier New"],
  "\:306f\:7dd1\:8272\:3092\:8868\:3057\:3066\:3044\:307e\:3059\:ff0e\:3064\
\:307e\:308a\:3053\:3053\:3067\:306f{\:8d64, \:7dd1}\:3068\:3044\:3046\:6307\
\:5b9a\:3092\:3057\:3066\:3044\:308b\:306e\:3067\:3059\:304c\:ff0c\:305d\:308c\
\:305e\:308c\:304c\:6700\:521d\:306e\:5f15\:6570\:3067\:6307\:5b9a\:3057\:3066\
\:3044\:308b\:95a2\:6570\:306e\:7d44\:306b\:5bfe\:5fdc\:3057\:3066\:3044\:307e\
\:3059\:ff0e\:3059\:306a\:308f\:3061\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`\(\(x\^2\)\(\ \)\)\)]],
  "\:306f\:8d64\:3067\:ff0c",
  Cell[BoxData[
      \(TraditionalForm\`2  x\^2\)]],
  "\:306f\:7dd1\:8272\:3067\:63cf\:753b\:3059\:308b\:3068\:3044\:3046\:8a18\
\:8ff0\:3067\:3059\:ff0e"
}], "Text"],

Cell[TextData[{
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:306f3\:756a\:76ee\:4ee5\
\:964d\:306e\:5f15\:6570\:3067\:3042\:308c\:3070\:9806\:5e8f\:306b\:95a2\:4fc2\
\:306a\:304f\:6307\:5b9a\:3067\:304d\:307e\:3059\:ff0e\:5192\:982d\:306e\:4f8b\
\:3067\:6700\:5f8c\:306b\:6307\:5b9a\:3057\:3066\:3044\:305f",
  StyleBox["AxesStyle",
    FontFamily->"Courier New"],
  "\:306f\:5404\:8ef8\:306e\:30e9\:30d9\:30eb\:3092\:8a2d\:5b9a\:3059\:308b\
\:305f\:3081\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:3067\:3059\:ff0e2\:6b21\
\:5143\:306e\:5834\:5408\:306f{",
  Cell[BoxData[
      \(TraditionalForm\`x\)]],
  "\:8ef8\:306e\:30e9\:30d9\:30eb,  ",
  Cell[BoxData[
      \(TraditionalForm\`y\)]],
  " \:8ef8\:306e\:30e9\:30d9\:30eb}\:3068\:3044\:3046\:30da\:30a2\:3067\:8a18\
\:8ff0\:3059\:308b\:3068\:ff0c\:305d\:308c\:305e\:308c\:306e\:8ef8\:306b\:30e9\
\:30d9\:30eb\:304c\:8868\:793a\:3055\:308c\:307e\:3059\:ff0e"
}], "Text"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:30aa\:30d7\:30b7\:30e7\:30f3\:3044\:308d\:3044\:308d", "Section"],

Cell[TextData[{
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:306b\:306f\:5b9f\:306b\:3055\:307e\:3056\:307e\:306a\:30aa\
\:30d7\:30b7\:30e7\:30f3\:304c\:7528\:610f\:3055\:308c\:3066\:3044\:307e\:3059\
\:ff0e\:524d\:306e\:30bb\:30af\:30b7\:30e7\:30f3\:3067\:7d39\:4ecb\:3057\:3066\
\:3044\:306a\:3044\:5225\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3063\
\:3066\:95a2\:6570\:306e\:3044\:308d\:3093\:306a\:63cf\:753b\:3092\:697d\:3057\
\:307f\:307e\:3057\:3087\:3046\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(PlotStyle \[Rule] {Thickness[0.04], Thickness[0.01]}\),
          FontColor->RGBColor[1, 0, 0]]}], "\[IndentingNewLine]", 
      "]"}]], "Input"],

Cell[TextData[{
  "\:4e0a\:306e\:56f3\:306f\:7dda\:306e\:592a\:3055\:3092\:5909\:3048\:3066\
\:3042\:308a\:307e\:3059\:ff0e\:7dda\:306e\:592a\:3055\:306f",
  StyleBox["Thickness",
    FontFamily->"Courier New"],
  "\:3068\:3044\:3046\:95a2\:6570\:3067\:4e0e\:3048\:3089\:308c\:307e\:3059\
\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(PlotStyle \[Rule] {Dashing[{0.08, 0.03}], 
              Dashing[{0.01, 0.01}]}\),
          FontColor->RGBColor[1, 0, 0]]}], "]"}]], "Input"],

Cell[TextData[{
  "\:4eca\:5ea6\:306f\:7dda\:3092\:7834\:7dda\:306b\:3057\:3066\:3042\:308a\
\:307e\:3059\:ff0e\:7834\:7dda\:306f",
  StyleBox["Dashing",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:3067\:4e0e\:3048\:3089\:308c\:307e\:3059\:ff0e"
}], "Text"],

Cell["\<\
\:8907\:6570\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:7d44\:307f\:5408\:308f\
\:305b\:308b\:306b\:306f\:6b21\:306e\:3088\:3046\:306a\:30ea\:30b9\:30c8\:3067\
\:304f\:304f\:3063\:305f\:5f62\:306b\:3057\:307e\:3059\:ff0e\
\>", "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(PlotStyle \[Rule] {\[IndentingNewLine]{RGBColor[1, 0, 0], 
                Thickness[0.01]}, \[IndentingNewLine]{RGBColor[0, 1, 0], 
                Thickness[0.01], 
                Dashing[{0.001, 0.02}]}\[IndentingNewLine]}\),
          FontColor->RGBColor[1, 0, 0]]}], "\[IndentingNewLine]", 
      "]"}]], "Input"],

Cell["\<\
\:4eca\:307e\:3067\:306f\:30b0\:30e9\:30d5\:305d\:306e\:3082\:306e\:306e\:7dda\
\:306e\:8272\:3084\:5f62\:306b\:3064\:3044\:3066\:5909\:5316\:3092\:65bd\:3057\
\:3066\:304d\:307e\:3057\:305f\:ff0e\:6b21\:306b\:8ef8\:3084\:30e9\:30d9\:30eb\
\:306a\:3069\:306b\:3064\:3044\:3066\:306e\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\
\:7d39\:4ecb\:3057\:307e\:3059\:ff0e\
\>", "Text"],

Cell[TextData[{
  "\:5148\:306b\:7d39\:4ecb\:3057\:305f\:3088\:3046\:306b\:ff0c\:8ef8\:306b\
\:30e9\:30d9\:30eb\:3092\:8a2d\:5b9a\:3059\:308b\:306b\:306f",
  StyleBox["AxesLabel",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3044\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(AxesLabel \[Rule] {x, y}\),
          FontColor->RGBColor[1, 0, 0]]}], "]"}]], "Input"],

Cell[TextData[{
  "\:63cf\:753b\:306e\:7bc4\:56f2\:3092\:5909\:3048\:308b\:3068\:304d\:306f",
  StyleBox["PlotRange",
    FontFamily->"Courier New"],
  "\:3068\:3044\:3046\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3044\:307e\
\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        StyleBox[\(PlotRange \[Rule] {{\(-2\), 2}, {\(-3\), 3}}\),
          FontColor->RGBColor[1, 0, 0]]}], 
      StyleBox[" ",
        FontColor->RGBColor[1, 0, 0]], "]"}]], "Input"],

Cell[TextData[{
  "\:5c11\:3057\:6a2a\:306b\:3064\:3076\:308c\:305f\:5f62\:306b\:306a\:3063\
\:3066\:3057\:307e\:3044\:307e\:3057\:305f\:ff0e\:5b9f\:306f",
  StyleBox["Plot",
    FontFamily->"Courier New"],
  "\:95a2\:6570\:3067\:751f\:6210\:3055\:308c\:308b\:30b0\:30e9\:30d5\:306f\
\:30c7\:30d5\:30a9\:30eb\:30c8\:3067\:81ea\:52d5\:7684\:306b\:30b0\:30e9\:30d5\
\:306e\:7e26\:6a2a\:306e\:6bd4\:304c\:9ec4\:91d1\:6bd4(=1.61803)\:306e\:9006\
\:6570\:306b\:306a\:308b\:3088\:3046\:306b\:8a2d\:5b9a\:3055\:308c\:3066\:3044\
\:308b\:306e\:3067\:3059\:ff0e\:3053\:306e\:8a2d\:5b9a\:306f",
  StyleBox["AspectRatio",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3067\:5909\:66f4\:3059\:308b\:3053\:3068\
\:304c\:3067\:304d\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), 
        ",", \(PlotRange \[Rule] {{\(-2\), 2}, {\(-3\), 3}}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(AspectRatio \[Rule] 1\),
          FontColor->RGBColor[1, 0, 0]]}], 
      StyleBox["  ",
        FontColor->RGBColor[1, 0, 0]], "]"}]], "Input"],

Cell[TextData[{
  "\:4ee5\:4e0a\:ff0c\:3044\:304f\:3064\:304b\:306e\:30aa\:30d7\:30b7\:30e7\
\:30f3\:306e\:4f7f\:3044\:65b9\:306b\:3064\:3044\:3066\:5b66\:7fd2\:3057\:3066\
\:304d\:307e\:3057\:305f\:304c\:ff0c",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  "\:306b\:306f\:307e\:3060\:307e\:3060\:305f\:304f\:3055\:3093\:306e\:30aa\
\:30d7\:30b7\:30e7\:30f3\:304c\:7528\:610f\:3055\:308c\:3066\:3044\:307e\:3059\
\:ff0e\:307e\:305a\:306f\:3053\:3053\:3067\:7d39\:4ecb\:3057\:305f\:30aa\:30d7\
\:30b7\:30e7\:30f3\:3092\:3057\:3063\:304b\:308a\:3068\:4f7f\:3048\:308b\:3088\
\:3046\:306b\:306a\:308a\:307e\:3057\:3087\:3046\:ff0e"
}], "Text"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:7c21\:5358Q&A", "Section"],

Cell[CellGroupData[{

Cell["\:8ef8\:3067\:306f\:306a\:304f\:3001\:67a0\:3092\:8a2d\:5b9a\:3057\:305f\
\:3044", "Subsection"],

Cell[TextData[{
  StyleBox["Frame",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3063\:3066\:307f\:307e\:3057\
\:3087\:3046\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        StyleBox[\(Frame \[Rule] True\),
          FontColor->RGBColor[1, 0, 0]], ",", \(Axes \[Rule] None\)}], 
      "]"}]], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["\:5ea7\:6a19\:8ef8\:306e\:76ee\:76db\:308a\:3092\:5909\:66f4\:3057\:305f\
\:3044", "Subsection"],

Cell[TextData[{
  StyleBox["Ticks",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3044\:307e\:3059\:ff0e\:4f8b\
\:3048\:3070\:5ea7\:6a19\:8ef8\:304c\:5fc5\:8981\:306a\:3044\:5834\:5408\:306f\
\:4ee5\:4e0b\:306e\:3088\:3046\:306b",
  StyleBox["Ticks",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3092",
  StyleBox["None",
    FontFamily->"Courier New"],
  "\:306b\:8a2d\:5b9a\:3057\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(Ticks \[Rule] None\),
          FontColor->RGBColor[1, 0, 0]]}], " ", "]"}]], "Input"],

Cell[TextData[{
  "\:307e\:305f\:ff0c\:76ee\:76db\:308a\:3092\:632f\:308b\:7b87\:6240\:3092\
\:6307\:5b9a\:3059\:308b\:3053\:3068\:3082\:3067\:304d\:307e\:3059\:ff0e(",
  StyleBox["Automatic",
    FontFamily->"Courier New"],
  "\:306b\:3059\:308b\:3068\:81ea\:52d5\:7684\:306b\:76ee\:76db\:308a\:3092\
\:8a2d\:5b9a\:3057\:307e\:3059)"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(Ticks \[Rule] {{\(-2\), \(-1\), 0, 1, 2}, Automatic}\),
          FontColor->RGBColor[1, 0, 0]]}], " ", "]"}]], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["\:30b0\:30e9\:30d5\:306b\:65b9\:773c\:7dda\:3092\:6577\:304d\:8a70\:3081\
\:305f\:3044", "Subsection"],

Cell[TextData[{
  StyleBox["GridLines",
    FontFamily->"Courier New"],
  "\:30aa\:30d7\:30b7\:30e7\:30f3\:3092\:4f7f\:3044\:307e\:3059\:ff0e"
}], "Text"],

Cell[BoxData[
    RowBox[{"Plot", "[", 
      RowBox[{\({x\^2, 2  x\^2}\), ",", \({x, \(-2\), 2}\), ",", 
        "\[IndentingNewLine]", \(Axes \[Rule] None\), 
        ",", \(Frame \[Rule] True\), ",", \(AspectRatio \[Rule] 1\), ",", 
        "\[IndentingNewLine]", 
        StyleBox[\(GridLines \[Rule] Automatic\),
          FontColor->RGBColor[1, 0, 0]]}], 
      StyleBox["  ",
        FontColor->RGBColor[1, 0, 0]], "]"}]], "Input"]
}, Closed]],

Cell["Copyright \[Copyright] CAT Inc., 2001, All rights reserved.", \
"Commentary",
  Editable->False,
  ShowCellBracket->False,
  TextAlignment->Center]
}, Open  ]]
}, Open  ]]
},
FrontEndVersion->"4.0 for Microsoft Windows",
ScreenRectangle->{{0, 1024}, {0, 695}},
CellGrouping->Manual,
WindowSize->{640, 530},
WindowMargins->{{159, Automatic}, {Automatic, 39}},
StyleDefinitions -> "Report.nb"
]


(***********************************************************************
Cached data follows.  If you edit this Notebook file directly, not using
Mathematica, you must remove the line containing CacheID at the top of 
the file.  The cache data will then be recreated when you save this file 
from within Mathematica.
***********************************************************************)

(*CellTagsOutline
CellTagsIndex->{}
*)

(*CellTagsIndex
CellTagsIndex->{}
*)

(*NotebookFileOutline
Notebook[{
Cell[1717, 49, 211, 5, 21, "Text"],

Cell[CellGroupData[{
Cell[1953, 58, 170, 3, 49, "Title"],
Cell[2126, 63, 447, 9, 46, "Text"],

Cell[CellGroupData[{
Cell[2598, 76, 73, 0, 67, "Section"],
Cell[2674, 78, 321, 6, 29, "Text"],
Cell[2998, 86, 242, 4, 97, "Input"],
Cell[3243, 92, 382, 6, 46, "Text"],
Cell[3628, 100, 193, 5, 29, "Text"],
Cell[3824, 107, 203, 5, 37, "Program"],
Cell[4030, 114, 226, 4, 29, "Text"],
Cell[4259, 120, 229, 5, 29, "Text"],
Cell[4491, 127, 59, 1, 36, "Input"],
Cell[4553, 130, 404, 6, 46, "Text"],
Cell[4960, 138, 339, 7, 29, "Text"],
Cell[5302, 147, 194, 5, 36, "Input"],
Cell[5499, 154, 666, 13, 46, "Text"],
Cell[6168, 169, 603, 13, 46, "Text"],
Cell[6774, 184, 322, 7, 77, "Input"],
Cell[7099, 193, 1036, 17, 80, "Text"],
Cell[8138, 212, 1529, 32, 97, "Text"],
Cell[9670, 246, 977, 20, 63, "Text"]
}, Open  ]],

Cell[CellGroupData[{
Cell[10684, 271, 73, 0, 67, "Section"],
Cell[10760, 273, 513, 9, 46, "Text"],
Cell[11276, 284, 302, 6, 77, "Input"],
Cell[11581, 292, 308, 7, 29, "Text"],
Cell[11892, 301, 299, 6, 57, "Input"],
Cell[12194, 309, 262, 6, 29, "Text"],
Cell[12459, 317, 244, 4, 29, "Text"],
Cell[12706, 323, 476, 9, 137, "Input"],
Cell[13185, 334, 380, 6, 46, "Text"],
Cell[13568, 342, 294, 6, 29, "Text"],
Cell[13865, 350, 244, 5, 57, "Input"],
Cell[14112, 357, 252, 6, 29, "Text"],
Cell[14367, 365, 292, 6, 36, "Input"],
Cell[14662, 373, 769, 14, 63, "Text"],
Cell[15434, 389, 366, 8, 57, "Input"],
Cell[15803, 399, 648, 11, 63, "Text"]
}, Open  ]],

Cell[CellGroupData[{
Cell[16488, 415, 34, 0, 67, "Section"],

Cell[CellGroupData[{
Cell[16547, 419, 102, 1, 41, "Subsection"],
Cell[16652, 422, 176, 5, 29, "Text"],
Cell[16831, 429, 241, 5, 36, "Input"]
}, Closed]],

Cell[CellGroupData[{
Cell[17109, 439, 102, 1, 25, "Subsection"],
Cell[17214, 442, 467, 12, 46, "Text"],
Cell[17684, 456, 243, 5, 57, "Input"],
Cell[17930, 463, 346, 7, 46, "Text"],
Cell[18279, 472, 277, 5, 57, "Input"]
}, Closed]],

Cell[CellGroupData[{
Cell[18593, 482, 108, 1, 25, "Subsection"],
Cell[18704, 485, 154, 4, 29, "Text"],
Cell[18861, 491, 438, 9, 77, "Input"]
}, Closed]],
Cell[19314, 503, 153, 4, 21, "Commentary"]
}, Open  ]]
}, Open  ]]
}
]
*)




(***********************************************************************
End of Mathematica Notebook file.
***********************************************************************)