- R-br - DINF UFPR

Trocar a fonte de expression()
by Leonardo Monteiro 09 Set '14

09 Set '14

Boa noite, eu nao estou conseguindo trocar a fonte do texto que esta dentro do expression() gostaria de por para o estilo 'times new roman', e estava usando font = 6, entretanto sem sucesso. alguem teria uma solucao p isso? a<- 1:10 b<- 3/a plot(a,b) text(6, 2, expression(mg^-1), font = 6) obrigado, Leonardo

2 1

Classificação de pontos que pertencem a uma condição dada (x,y)
by ASANTOS 09 Set '14

09 Set '14

Boa tarde Pessoal, Fiz a representação de 48 parcelas com plantas no espaçamento de 2x4m usando a função expand.grid(), sendo as parcelas espaçadas em 7m (grid1), após criei pontos que presentam o centro das parcelas (grid2) e sobre esses pontos eu adicionei os códigos das parcelas (parc.names). Gostaria de saber se existe uma forma de criar uma classificação onde quero saber a qual código da parcela (parc.names) pertence cada um dos pontos que representam as plantas (grid1). Segue CRM: ##Plantas ---------------------------------------------------------------------- ## Coordenadas do grid no espaçamento 2x4 ## distâncias verticais e horizontais v <- 2; h <- 4 ## número de pontos vertical e horizontal npv <- 4; nph <- 5 ## distância entre vãos vertical e hotizontal V <- 7; H <- 7 ## número de linhas e colunas ncol <- 4; nrow <- 12 grid0 <- expand.grid(L=seq(2,length.out=nrow,by=npv*v+V), C=seq(2,length.out=ncol,by=nph*h+H), x=seq(2,length.out=npv,by=v), y=seq(2,length.out=nph,by=h)) grid1 <- with(grid0, data.frame(x=L+x, y=C+y)) plot(y~x, grid1, asp=1) ## Centro das parcelas ------------------------------------------------------ grid2 <- expand.grid(x1=seq(7,length.out=12,by=15), y1=seq(12,length.out=4,by=27)) points(grid2[,1],grid2[,2],col="red") #Código das parcelas parc.names<-c("2211","1221","3221","1122","2122","3222","1113","2113","3223","1124","2214","3114", "2111","1121","3211","1112","2212","3212","1213","2123","3213","1214","2124","3224", "2221","1211","3111","1212","2222","3112","1223","2213","3113","1224","2224","3214", "2121","1111","3121","1222","2112","3122","1123","2223","3123","1114","2114","3124") text(grid2$x1,grid2$y1,labels=parc.names,cex=1,col=2) # Obrigado, -- ====================================================================== Alexandre dos Santos Proteção Florestal IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso Campus Cáceres Caixa Postal 244 Avenida dos Ramires, s/n Bairro: Distrito Industrial Cáceres - MT CEP: 78.200-000 Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO) e-mails:alexandresantosbr@yahoo.com.br alexandre.santos(a)cas.ifmt.edu.br Lattes: http://lattes.cnpq.br/1360403201088680 ======================================================================

2 2

fixar sigmasq na funcao likfit do pacote geoR
by Fernanda De Bastiani 09 Set '14

09 Set '14

Olá, estou trabalhando com o pacote geoR e utilizando a função likfit() para estimar os parametros. Percebi que a função disponibilizo a opção fix.nugget para podermos fixar o valor do nugget (efeito pepita). No entanto, gostaria saber se existe a opção de ficar o valor de sigmasq (sill), e usar a função likfit() para estimar somente os outros parâmetros. Além disso, alguém poderia por favor me fornecer algum material que possua algum exemplo pratico desta função (likfit()) utilizando a opção "realisations"? Grata pela atenção, Fernanda

2 2

obtencao do coef. de determinacao
by Leonardo Monteiro 09 Set '14

09 Set '14

Prezado Walmes, desculpa, mas minha eu nao consegui identificar a resposta da minha pergunta na sua resposta... se eu 'forcar' a reta de regressao a passar pelo zero, o R2 devera ser maior ou menor? obrigado, Leonardo. --

2 1

Sequencia de Imagens
by David Feitosa 09 Set '14

09 Set '14

Boa noite! Há algum tempo, eu lembro de ter visto um artigo que unia o recurso do R com Markdown/LaTex. No exemplo, era gerado um pdf com um animação, a partir de uma série de imagens. Recentemente, eu fiz uma implementação de um algoritmo que gera uma série de imagens e mostra uma "evolução" de um processo, mas não me recordo do pacote que gera o pdf com a animação. Alguém já usou este recurso ou sabe como gerar essa animação? Atenciosamente, David Feitosa (\_(\ (=°;°) (("")("")

3 5

Re: [R-br] Sequencia de Imagens
by Robert Iquiapaza 09 Set '14

09 Set '14

library(animation) Att From: David Feitosa Sent: Monday, September 08, 2014 10:40 PM To: R-br(a)listas.c3sl.ufpr.br Subject: [R-br] Sequencia de Imagens Boa noite! Há algum tempo, eu lembro de ter visto um artigo que unia o recurso do R com Markdown/LaTex. No exemplo, era gerado um pdf com um animação, a partir de uma série de imagens. Recentemente, eu fiz uma implementação de um algoritmo que gera uma série de imagens e mostra uma "evolução" de um processo, mas não me recordo do pacote que gera o pdf com a animação. Alguém já usou este recurso ou sabe como gerar essa animação? Atenciosamente, David Feitosa (\_(\ (=°;°) (("")("") -------------------------------------------------------------------------------- _______________________________________________ R-br mailing list R-br(a)listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

2 1

Leitura de número como caractere
by Vanessa Felix 09 Set '14

09 Set '14

Pessoal boa noite, Gostaria de saber porque estranhamente o R leu 4 colunas dos meus dados (anos 1991,1992,1994,1995) como caracter, sendo que nas outras ele leu normalmente como numérico. Poderiam me ajudar tbm em como converter de caractere para numérico. Pq já aconteceu comigo outras vezes. Obgda, # 2 dado_conc<-read.csv("PIB_estadual_pcorrentes_1939_2010.csv",sep=";",dec=",",header=TRUE, as.is=TRUE) str(dado_conc) 'data.frame': 151 obs. of 54 variables: $ X : chr "" "" "PIB POR UF (R$MIL)" "1939-1994: EST.SEC.XX (PART.NO PIB TOTAL)" ... $ X.1 : int NA NA NA NA NA NA 12 27 13 16 ... $ X.2 : chr "PIB BRASIL (R$MIL)" "" "" "" ... $ X1939: num 1.69e-08 NA NA NA NA ... $ X1947: num 6.49e-08 NA NA NA NA ... $ X1948: num 7.54e-08 NA NA NA NA ... $ X1949: num 8.79e-08 NA NA NA NA ... $ X1950: num 1.02e-07 NA NA NA NA ... $ X1951: num 1.27e-07 NA NA NA NA ... $ X1952: num 1.49e-07 NA NA NA NA ... $ X1953: num 1.78e-07 NA NA NA NA ... $ X1954: num 2.44e-07 NA NA NA NA ... $ X1955: num 2.96e-07 NA NA NA NA ... $ X1956: num 3.74e-07 NA NA NA NA ... $ X1957: num 4.54e-07 NA NA NA NA ... $ X1958: num 5.65e-07 NA NA NA NA ... $ X1959: num 8.43e-07 NA NA NA NA ... $ X1960: num 1.16e-06 NA NA NA NA ... $ X1961: num 1.69e-06 NA NA NA NA ... $ X1962: num 2.71e-06 NA NA NA NA ... $ X1963: num 4.86e-06 NA NA NA NA ... $ X1964: num 9.53e-06 NA NA NA NA ... $ X1965: num 1.55e-05 NA NA NA NA ... $ X1966: num 2.28e-05 NA NA NA NA ... $ X1970: num 7.07e-05 NA NA NA NA ... $ X1975: num 0.000382 NA NA NA NA ... $ X1980: num 0.00455 NA NA NA NA ... $ X1985: num 0.476 NA NA NA NA ... $ X1986: num 1.27 NA NA NA NA ... $ X1987: num 4.04 NA NA NA NA ... $ X1988: num 29.4 NA NA NA NA ... $ X1989: num 426 NA NA NA NA ... $ X1990: num 11549 NA NA NA NA ... $ X1991: chr "60285,99927" "" "" "" ... $ X1992: chr "640958,7676" "" "" "" ... $ X1993: num 14097114 NA NA NA NA ... $ X1994: chr "349204679" "" "" "" ... $ X1995: chr "705640892,1" "" "" "" ... $ X1996: num 8.44e+08 NA NA NA NA ... $ X1997: num 9.39e+08 NA NA NA NA ... $ X1998: num 9.79e+08 NA NA NA NA ... $ X1999: num 1.06e+09 NA NA NA NA ... $ X2000: num 1.18e+09 NA NA NA NA ... $ X2001: num 1.3e+09 NA NA NA NA ... $ X2002: num 1.48e+09 NA NA NA NA ... $ X2003: num 1.7e+09 NA NA NA NA ... $ X2004: num 1.94e+09 NA NA NA NA ... $ X2005: num 2.15e+09 NA NA NA NA ... $ X2006: num 2.37e+09 NA NA NA NA ... $ X2007: num 2.66e+09 NA NA NA NA ... $ X2008: num 3.03e+09 NA NA NA NA ... $ X2009: num 3.24e+09 NA NA NA NA ... $ X2010: num 3.77e+09 NA NA NA NA ... $ X2011: num 4.14e+09 NA NA NA NA ... # 3 anos<-dado_conc[1,4:54] str(anos) pib_bra<-dado_conc[2,4:54] str(pib_bra) pib_anos_bra<-rbind(anos,pib_bra) fix(pib_anos_bra) -- Vanessa Felix - Estatística (32) 8854-4881 / 9142-8428

6 10

obtencao de coef. de determinacao
by Leonardo Monteiro 08 Set '14

08 Set '14

Pessoal, mais outra questao sendo: a<- 1:10 b<- c(3,6,5,6,8,10,8,11,10,12) quando eu faco summary(lm(b~a)) , me resulta em um Rsquared = 0,8743 Entretanto, quando eu forço a passagem pela origem do grafico: summary(lm(b ~a-1)), o valor de Rsquared é maior (~0.95) O valor do Rsquared quando eu forco a passagem pela origem nao deveria ser menor?? obrigado, Leonardo.

3 2

Salvando figura em 300 dpi
by Leonardo Monteiro 08 Set '14

08 Set '14

Prezados, mais uma vez gostaria da ajuda de voces.. Bem, eu preciso salvar graficos em 300 dpi, entretanto nao estou conseguindo (infelizmente estou conseguindo salva-los em apenas 96 dpi) Alguem poderia me ajudar? mais uma vez, obrigado, Leonardo

3 2

Excluindo valores NaN
by Leonardo Monteiro 08 Set '14

08 Set '14

Pessoal, bom dia Preciso excluir valores NaN e na de um cjto de dados, p fazer o grafico de dispersao. alguem poderia me ajudar? obrigado, Leonardo

3 2