(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.4' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[      2202,         65]
NotebookOptionsPosition[      1856,         48]
NotebookOutlinePosition[      2235,         64]
CellTagsIndexPosition[      2192,         61]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Importando dados", "Title",
 CellChangeTimes->{{3.6683634461340666`*^9, 3.6683634512376575`*^9}}],

Cell["\<\
Ler um arquivo de dados e fazer gr\[AAcute]ficos com os valores obtidos
i.\tLeia o arquivo muge.dat (que est\[AAcute] copiado nesta mesma pasta)
ii.\tSelecione os valores num\[EAcute]ricos
iii.\tSepare os valores das 4 primeiras colunas. A primeira corresponde \
\[AGrave] vari\[AAcute]vel x e as outras 3, a y1, y2 e y3.
iv.\tSelecione as unidades das grandezas das 4 primeiras colunas, que est\
\[ATilde]o entre par\[EHat]nteses na 6\.aa linha do arquivo. Se precisar, \
releia o arquivo como texto.
v.\tFa\[CCedilla]a, no mesmo sistema de eixos, os tr\[EHat]s gr\[AAcute]ficos \
{x,y1}, {x,y2} e {x,y3}. Vale a pena usar escalas logar\[IAcute]tmicas em \
ambos os eixos.
vi.\tDecore o gr\[AAcute]fico, com os nomes dos eixos (x ou y e a unidade) e \
dos gr\[AAcute]ficos (y1,y2,y3)
vii.\tSelecione do conjunto de dados {x,y2} apenas os pontos em que y2>0.1 Fa\
\[CCedilla]a um gr\[AAcute]fico em escala linear desse novo conjunto, para \
verificar sua sele\[CCedilla]\[ATilde]o.
\
\>", "Text",
 CellChangeTimes->{{3.6683635793558736`*^9, 3.6683635959084177`*^9}, 
   3.6683647751482105`*^9, {3.6684090869245214`*^9, 3.6684091024968576`*^9}}]
}, Open  ]]
},
WindowSize->{1253, 709},
WindowMargins->{{233, Automatic}, {Automatic, 103}},
Magnification:>1.3 Inherited,
FrontEndVersion->"10.4 for Microsoft Windows (64-bit) (February 25, 2016)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 103, 1, 131, "Title"],
Cell[686, 25, 1154, 20, 288, "Text"]
}, Open  ]]
}
]
*)