Programa r

Geomatemática II
Modelagem Com o Programa R

Exercicio 1

Gráfico Profundidade x Inclinação:

> dados<-read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela1.txt",header=TRUE)
> dados.novos<-edit(dados)
> read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela1.txt",header=T) Profundidade Inclinação
1 8519 3,18
2 8613 393
3 8705 4,39
4 8804 5,28
5 8898 7,62
6 8993 13,87
7 9090 20,71
8 9144 26,68
9 9181 32,29
10 9278 38,60
11 9386 45,09
12 9418 46,48
13 9512 48,65
14 9606 52.64
15 9698 55,93
16 9795 59,21
17 9817 69,55
18 9848 74,72
19 9911 79,39
20 10023 85,66
21 10099 88,18
22 10162 90,43
23 10244 92,37
> mm<-read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela1.txt",header=T)
> mm Profundidade Inclinação
1 8519 3,18
2 8613 393
3 8705 4,39
4 8804 5,28
5 8898 7,62
6 8993 13,87
7 9090 20,71
8 9144 26,68
9 9181 32,29
10 9278 38,60
11 9386 45,09
12 9418 46,48
13 9512 48,65
14 9606 52.64
15 9698 55,93
16 9795 59,21
17 9817 69,55
18 9848 74,72
19 9911 79,39
20 10023 85,66
21 10099 88,18
22 10162 90,43
23 10244 92,37
> attach(mm)
> plot(mm)

Gráfico Profundidade x Direção:
> dados<-read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela2.txt",header=TRUE)
> dados.novos<-edit(dados)
> read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela2.txt",header=T) profundidade