Programa r

Páginas: 7 (1646 palavras) Publicado: 3 de março de 2013
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 87054,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
189848 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
58898 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
199911 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)
profundidadeDireção
1 8519 172.44
2 8613 151.38
3 8705 142.36
4 8804 138.98
5 8898 141.37
7 9090 140.65
8 9144 138.22
9 9181 131.56
10 9278 125.22
11 9386 118.15
12 9418 117.21
13 9512 116.63
14 9606 114.99
15 9698 118.59
169795 120.11
17 9817 119.54
18 9848 115.75
19 9911 115.93
20 10023 115.36
21 10099 114.95
22 10162 114.82
23 10244 115.00
> mm<-read.table("C:\\Users\\hp.hp-PC\\Desktop//tabela2.txt",header=T)
> mm
profundidade Direção
1 8519 172.44
2 8613 151.38
3 8705 142.36
48804 138.98
5 8898 138.15
6 8993 141.37
7 9090 140.65
8 9144 138.22
9 9181 131.56
10 9278 125.22
11 9386 118.15
12 9418 117.21
13 9512 116.63
14 9606 114.99
15 9698 118.59
16 9795 120.11
17 9817 119.54
18 9848 115.75
19 9911 115.93
2010023 115.36
21 10099 114.95
22 10162 114.82
23 10244 115.00
> attach(mm)
> plot(mm)

Exercicio 2
Poligono (a) :
> x<-c(0.000,624.734,874.150,571.579,110.688)
> y<-c(0.000,48.078,275.063,509.256,285.327)
> x
[1] 0.000 624.734 874.150 571.579 110.688
> y
[1] 0.000 48.078 275.063 509.256 285.327
> plot(x,y)

> polygon(x,y)Poligono (b):

> x<-c(0.000,33.632,33.206,-46.859)
> y<-c(0.000,42.721,92.777,65.348)
> x
[1] 0.000 33.632 33.206 -46.859
> y
[1] 0.000 42.721 92.777 65.348
> plot(x,y)

> polygon(x,y)

Exercicio 3

> x<-seq(-1.5,1.5,length=100)
> x
[1] -1.50000000 -1.46969697 -1.43939394 -1.40909091 -1.37878788 -1.34848485
[7] -1.31818182 -1.28787879...
Ler documento completo

Por favor, assinar para o acesso.

Estes textos também podem ser interessantes

  • Relatório sobre o programa r
  • História dos Programas de R dio
  • ROTEITO DE PROGRAMA DE R DIO
  • Como Fazer Um Programa De R Dio
  • Cautelar Inominada Programa De R Dio
  • UTILIZAÇÃO DE ÍNDICES r E R OBTIDOS DE PROGRAMAS INTERLABORATORIAIS PARA O CONTROLE
  • Pauta programa de r dio trab tv
  • 3. Desenvolva um programa que calcule o volume de uma esfera de raio r, fornecido pelo

Seja um membro do Trabalhos Feitos

CADASTRE-SE AGORA!