Scribd
Upload
135 views6 pages

Printed by Mathematica For Students

Uploaded by

nich2110
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
135 views6 pages

Printed by Mathematica For Students

Uploaded by

nich2110
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
You are on page 1/ 6

In[1]:=

MatrixForm@
data = 88x, y, y 2<, 80 * 6.43 30, 4.779, 2.389<,
81 * 6.43 30, 4.752, 2.376<, 82 * 6.43 30, 4.687, 2.343<,
83 * 6.43 30, 4.563, 2.281<, 84 * 6.43 30, 4.313, 2.156<,
85 * 6.43 30, 3.813, 1.907<, 86 * 6.43 30, 3.008, 1.504<,
87 * 6.43 30, 2.496, 1.248<, 88 * 6.43 30, 2.404, 1.202<,
89 * 6.43 30, 2.400, 1.200<, 810 * 6.43 30, 2.136, 1.068<,
811 * 6.43 30, 1.885, .942<, 812 * 6.43 30, 1.438, .719<,
813 * 6.43 30, 1.063, .531<, 814 * 6.43 30, .750, .375<,
815 * 6.43 30, .594, .297<, 816 * 6.43 30, .563, .281<,
817 * 6.43 30, .502, .251<, 818 * 6.43 30, .469, .234<,
819 * 6.43 30, .438, .219<, 820 * 6.43 30, .406, .203<,
821 * 6.43 30, .375, .188<, 822 * 6.43 30, .344, .172<,
823 * 6.43 30, .312, .156<, 824 * 6.43 30, .281, .141<,
825 * 6.43 30, .251, .125<, 826 * 6.43 30, 1.253, .626<,
827 * 6.43 30, 2.062, 1.031<, 828 * 6.43 30, 2.781, 1.390<,
829 * 6.43 30, 3.181, 1.591<, 830 * 6.43 30, 3.817, 1.909<<
D

Out[1]//MatrixForm=

0.
0.214333
0.428667
0.643
0.857333
1.07167
1.286
1.50033
1.71467
1.929
2.14333
2.35767
2.572
2.78633
3.00067
3.215
3.42933
3.64367
3.858
4.07233
4.28667
4.501
4.71533
4.92967
5.144
5.35833
5.57267
5.787
6.00133
6.21567
6.43

4.779
4.752
4.687
4.563
4.313
3.813
3.008
2.496
2.404
2.4
2.136
1.885
1.438
1.063
0.75
0.594
0.563
0.502
0.469
0.438
0.406
0.375
0.344
0.312
0.281
0.251
1.253
2.062
2.781
3.181
3.817

y
2

2.389
2.376
2.343
2.281
2.156
1.907
1.504
1.248
1.202
1.2
1.068
0.942
0.719
0.531
0.375
0.297
0.281
0.251
0.234
0.219
0.203
0.188
0.172
0.156
0.141
0.125
0.626
1.031
1.39
1.591
1.909

Printed by Mathematica for Students

Bottle-ClassExample.nb

In[3]:=

ListPlot@
Table@
8data@@i, 1DD, data@@i, 3DD<,
8i, 2, 32<
D,
Filling Axis,
AspectRatio Automatic
D
2.0
1.5

Out[3]=

1.0
0.5

1
In[12]:=

Out[12]=
In[9]:=

f = Interpolation@Table@
8data@@i, 1DD, data@@i, 3DD<,
8i, 2, 32<D,
InterpolationOrder 1
D

InterpolatingFunction@880., 6.43<<, <>D


Plot@f@xD,
8x, 0, 6.43<,
AspectRatio Automatic,
PlotRange All,
AxesOrigin 80, 0<
D
2.5
2.0
1.5

Out[9]=

1.0
0.5

Printed by Mathematica for Students

Bottle-ClassExample.nb

In[11]:=

Show@
Plot@f@xD,
8x, 0, 6.43<,
PlotRange All,
AspectRatio Automatic,
AxesOrigin 80, 0<
D
,
ListPlot@
Table@
8data@@i, 1DD, data@@i, 3DD<,
8i, 2, 32<
D,
Filling Axis,
AspectRatio Automatic
D
D
2.5
2.0
1.5

Out[11]=

1.0
0.5

Printed by Mathematica for Students

Bottle-ClassExample.nb

In[13]:=

ParametricPlot3D@
8x, f@xD * Cos@tD, f@xD * Sin@tD<,
8x, 0, 6.43<,
8t, 0, 2 <,
D

AxesOrigin 80, 0<,


Boxed False,
AxesLabel 8x, y, z<
y
2
1
0
-1

-2

Out[13]=

-1

-2

2
x

In[14]:=
Out[14]=

* NIntegrate@f@xD ^ 2, 8x, 0, 6.43<D


30.4327

Printed by Mathematica for Students

Bottle-ClassExample.nb

Part::partw : Part 33 of
y
::x, y, >, 80., 4.779, 2.389<, 80.214333, 4.752, 2.376<, 80.428667, 4.687, 2.343<, 80.643, 4.563, 2.281<, 80.857333, 4.313, 2.156<
2
, 81.07167, 3.813, 1.907<, 81.286, 3.008, 1.504<, 81.50033, 2.496, 1.248<, 81.71467, 2.404, 1.202<, 12, 84.501, 0.375,

0.188<, 84.71533, 0.344, 0.172<, 84.92967, 0.312, 0.156<, 85.144, 0.281, 0.141<, 85.35833, 0.251, 0.125<, 85.57267, 1.253,
0.626<, 85.787, 2.062, 1.031<, 86.00133, 2.781, 1.39<, 86.21567, 3.181, 1.591<, 86.43, 3.817, 1.909<>

does not exist.

Part::partw : Part 33 of
y
::x, y, >, 80., 4.779, 2.389<, 80.214333, 4.752, 2.376<, 80.428667, 4.687, 2.343<, 80.643, 4.563, 2.281<, 80.857333, 4.313, 2.156<
2
, 81.07167, 3.813, 1.907<, 81.286, 3.008, 1.504<, 81.50033, 2.496, 1.248<, 81.71467, 2.404, 1.202<, 12, 84.501, 0.375,

0.188<, 84.71533, 0.344, 0.172<, 84.92967, 0.312, 0.156<, 85.144, 0.281, 0.141<, 85.35833, 0.251, 0.125<, 85.57267, 1.253,
0.626<, 85.787, 2.062, 1.031<, 86.00133, 2.781, 1.39<, 86.21567, 3.181, 1.591<, 86.43, 3.817, 1.909<>

does not exist.

Part::partw : Part 34 of
y
::x, y, >, 80., 4.779, 2.389<, 80.214333, 4.752, 2.376<, 80.428667, 4.687, 2.343<, 80.643, 4.563, 2.281<, 80.857333, 4.313, 2.156<
2
, 81.07167, 3.813, 1.907<, 81.286, 3.008, 1.504<, 81.50033, 2.496, 1.248<, 81.71467, 2.404, 1.202<, 12, 84.501, 0.375,

0.188<, 84.71533, 0.344, 0.172<, 84.92967, 0.312, 0.156<, 85.144, 0.281, 0.141<, 85.35833, 0.251, 0.125<, 85.57267, 1.253,
0.626<, 85.787, 2.062, 1.031<, 86.00133, 2.781, 1.39<, 86.21567, 3.181, 1.591<, 86.43, 3.817, 1.909<>

does not exist.

General::stop : Further output of Part::partw will be suppressed during this calculation.

Printed by Mathematica for Students

Bottle-ClassExample.nb

Printed by Mathematica for Students

You might also like