Fevereiro 2015 - R-br

[Dúvida] Submetendo código R em um cluster
by Pedro Rafael 28 Fev '15

28 Fev '15

Caros, eu tenho uma dúvida. Atualmente tenho um código paralelo que preciso submeter a um cluster. Estou utilizando o cluster Gauss do CESUP em que os detalhes dos seus hardwares podem serem encontrados no link: http://www.cesup.ufrgs.br/recursos-e-servicos/hardware-1/sgi-altix Basicamente em meu código eu faço uso de OpenMPI via biblioteca doSNOW que faz uso da SNOW e consequentemente da Rmpi. Uso também o pacote foreach onde uso a diretiva para paralelismo de loops %dopar%. O código simplesmente trata-se de simulações de Monte Carlo (MC) em que em cada loop de MC faço um bootstrap. Dentro de cada bootstrap faço uma otimização global em uma função objetivo via Particle Swarm Optimization que é bastante intensivo. Dessa forma, me pareceu razoável paralelizar o laço refere ao bootstrap. Matematicamente são independentes e um laço não depende de nenhum outro. O cluster em questão (cluster Gauss), o gerenciamento de filas é feito pelo PBS Pro 11. Estou um pouco de dificuldades de como construir o arquivo .sh para submissão do job. Não sei se devo usar o sistema FILL_UP ou ROUND_ROBIN como regras de alocação. Obrigado, Pedro Rafael.

1 0

Manipulação de tabela obtida com o getURL
by Michelle Bau Graczyk 27 Fev '15

27 Fev '15

Boa noite, Estou tentando coletar dados intraday do yahoo finance e manipular os dados obtidos excluindo todo cabeçalho, ou seja as 18 primeiras linhas, e tentando separar em colunas os dados restantes nas outras linhas. Já fiz várias tentaivas usando read.table, write,table e suas complementares e não obtive êxito. Alguém poderia por favor me ajudar? Abaixo segue o código e o que ele me fornece. Muito obrigada! Michelle library(RCurl) tmp <- getURL(' http://chartapi.finance.yahoo.com/instrument/1.0/AAPL/chartdata;type=quote;… ') tmp2<-paste(tmp, sep=",", dec='.') write.table(tmp2, "AAPL.txt") "x" "1" "uri:/instrument/1.0/AAPL/chartdata;type=quote;range=1d/csv ticker:aapl Company-Name:Apple Inc. Exchange-Name:NMS unit:MIN timezone:EST currency:USD gmtoffset:-18000 previous_close:133.0000 Timestamp:1424788200,1424811600 labels:1424790000,1424793600,1424797200,1424800800,1424804400,1424808000,1424811600 values:Timestamp,close,high,low,open,volume close:131.3100,133.5873 high:131.5000,133.6000 low:131.1700,133.5000 open:131.2700,133.5800 volume:0,2250400 1424788200,132.7800,132.9400,132.5100,132.9400,2077100 1424788260,132.6467,132.8000,132.6350,132.7300,503100 1424788379,132.5601,132.6500,132.3600,132.6500,625100 1424788380,132.0966,132.5700,132.0900,132.5600,553200 1424788440,132.2300,132.2600,132.0500,132.0900,579800 ….

4 5

MCA gráfico
by Edson Lira 27 Fev '15

27 Fev '15

Bom dia caros amigos. Novamente retomo um problema que ainda não consegui resolver. Download MCA COMUNICACAO.docx # nesse link tem o script o gráfico e as dúvidas | | | | | | | | | | | Download MCA COMUNICACAO.docxDownload MCA COMUNICACAO.docx free. File hosted free by DataFileHost. | | | | Visualizar em www.datafileho... | Visualizado por Yahoo | | | | | Download mj1.csv # os dados | | | | | | | | | | | Download mj1.csvDownload mj1.csv free. File hosted free by DataFileHost. | | | | Visualizar em www.datafileho... | Visualizado por Yahoo | | | | | No geral, necessito melhorar a aparência e a escala do gráfico e ainda não consegui. [ ]'s. Edson Lira Estatístico Manaus-Amazonas

2 1

ddply - obter ganho de peso médio
by Fernando Souza 26 Fev '15

26 Fev '15

Caros amigos Estou tentando criar um função para calcular o ganho de peso médio. Eu quero calcular o ganho de peso por animal, sendo o ganho de peso a média dos ganhos obtidas a cada duas medidas sucessivas. Eu estou utilizando a função ddply() do pacote {plyr} onde divido o dataframe em grupos por ANIMAL e aplico a seguinte função a cada grupo. No entanto eu preciso que o ganho de peso obtido entre duas medidas consecutivas para um animal seja armazenado em um vetor, para em seguida fazer a média dos ganhos de pesos. No entanto não consigo criar esse vetor.Quando utilizo o comando abaixo, a função ddply retorna uma mensagem de erro indicando que não foi possível encontrar o objeto ganho. Como posso resolver esse problema? install.packages("plyr") library(plyr) A <- function(x){ for (i in 1:length(x$Pesos)-1){ difPeso <- x$Pesos[i+1] -x$Pesos[i] dias <-as.numeric( x$DATA[i+1] - x$DATA[i]) ganho [i]<-difPeso/dias # Gostaria de guardar este resultado em um vetor e retornar somente a média } return(mean(ganho)) } ddply(GPD,.(ANIMAL),A) GPD<- structure(list(DATA = structure(c(16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16454, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463, 16425, 16437, 16451, 16463), class = "Date"), ANIMAL = structure(c(1L, 1L, 1L, 1L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 10L, 10L, 10L, 10L, 15L, 15L, 15L, 15L, 19L, 19L, 19L, 19L, 2L, 2L, 2L, 2L, 7L, 7L, 7L, 7L, 13L, 13L, 13L, 13L, 16L, 16L, 16L, 16L, 17L, 17L, 17L, 17L, 24L, 24L, 24L, 24L, 3L, 3L, 3L, 3L, 8L, 8L, 8L, 8L, 9L, 9L, 9L, 9L, 12L, 12L, 12L, 12L, 20L, 20L, 20L, 20L, 22L, 22L, 22L, 22L, 6L, 6L, 6L, 6L, 11L, 11L, 11L, 11L, 14L, 14L, 14L, 14L, 18L, 18L, 18L, 18L, 21L, 21L, 21L, 21L, 23L, 23L, 23L, 23L), .Label = c("1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "19", "20", "21", "22", "23", "24", "25" ), class = "factor"), TRAT = structure(c(4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L, 4L, 4L, 4L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L, 4L, 4L, 4L, 4L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 4L, 4L, 4L, 4L, 3L, 3L, 3L, 3L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = c("C", "T1", "T2", "T3"), class = "factor"), CONSUMO = c(0.6847039559, 0.659115454, 0.8601238438, 0.9662238017, 0.653160515, 0.76204388, 0.829147492, 1.0781859662, 0.5080284272, 0.7916373952, 0.7176244537, 1.2145475842, 0.5901562027, 0.5354316571, 0.9090091044, 0.8230424453, 0.800990936, 0.8258115771, 1.0350092142, 1.1778239333, 0.4218995736, 0.748182177, 0.9008559089, 0.7793604982, 0.8503107855, 0.8743924455, 1.0149210147, 1.2117686308, 1.0008721911, 0.9224992, 1.0628987486, 1.3235606054, 0.5847562394, 0.5971266995, 0.9015356047, 1.1422017785, 0.5506020875, 0.8996851452, 1.1010903098, 1.2777703226, 0.7757312968, 0.7327742822, 0.9957085833, 1.299725333, 0.6184034276, 0.7019017179, 0.8252818991, 0.7725886442, 0.57584, 0.8274993578, 0.9568347616, 1.0673499251, 0.7403614923, 0.7388590798, 0.7659735658, 1.0623794866, 0.6109657028, 0.683632284, 0.8188398169, 0.9643152772, 0.6384021189, 1.0495757074, 1.0262077037, 1.3312530279, 0.9202033913, 0.8721430158, 1.038471733, 1.1844675851, 0.8142008896, 1.0393409306, 1.2542648171, 1.3544221328, 0.5135583976, 0.5789023337, 0.7218802192, 1.0082128242, 0.7826673895, 0.9077870689, 0.9303001507, 1.4221483678, 0.8357668107, 0.8984098957, 1.0042573313, 1.5336138147, 0.407296, 0.6941073063, 0.8535336465, 0.9517448657, 0.5418470982, 0.5011396696, 0.6771379951, 0.6793475586, 0.7004441364, 0.9387915881, 1.0943207226, 1.2500940543 ), Pesos = c(14.75, 15.35, 16.8, 18.4, 17.6, 17.95, 19.2, 21, 19.4, 20.05, 21.4, 23.4, 14.55, 14.4, 15.1, 16.5, 19.1, 19.3, 20.4, 21.9, 16.3, 17.45, 18.9, 20.6, 22.25, 22.5, 23.5, 25.2, 22.8, 21.9, 24.2, 26.6, 18.45, 18.3, 19.5, 21.2, 21.8, 23.2, 22, 24.9, 18.6, 19.05, 20, 21, 17, 17.9, 18.5, 19.45, 20.6, 21.3, 22.6, 24.5, 19.1, 19.4, 20.1, 22.25, 16.65, 16.95, 17.8, 19.4, 22.8, 23.8, 24.4, 26.3, 19.3, 20.15, 21.9, 23.6, 22.9, 24.1, 25.6, 26.45, 16.65, 16.55, 17.3, 18.85, 22.4, 23.1, 25.4, 27.3, 22.9, 22.95, 25, 26.9, 16.7, 18.15, 19.7, 20.6, 14.05, 14.9, 15.6, 16.4, 18.9, 19.85, 21.8, 23.2)), .Names = c("DATA", "ANIMAL", "TRAT", "CONSUMO", "Pesos"), row.names = c(NA, -96L), class = "data.frame") -- Fernando Antônio de Souza Zootecnista,Dsc. Nutrição e alimentação animal (UFMG) Lattes: http://lattes.cnpq.br/6519538815038307 e-mail:nandodesouza@gmail.com (82)9618-6457 (tim) (82)8113-8781 (vivo) (82)3313-8781 (net) (31)9784-5273 (vivo-MG)

3 6

aumentar a velocidade
by Ze Henrique 26 Fev '15

26 Fev '15

Boa tarde pessoal, estou trabalhando com a função disponível no link < http://morotalab.org/Mrode2005/relmat/quass.txt> e gostaria de aumentar a velocidade de execução da funcão. Qualquer opinião é bem vinda. Segue abaixo um CMR: sire <- rep(1:50,each=50) dam <- rep(1:50,50) s <- c(rep(0,50),sire) d = c(rep(0,50),dam) system.time(quass(p,m)) Desde já obrigado -- *José Henrique Soler Guilhen* Mestrando em Genética e Melhoramento Universidade Federal do Espírito Santo - CCAUFES

1 0

Duvida em estatística espacial - Kernel em duas dimensões levando em conta prevalências.
by Augusto Ribas 26 Fev '15

26 Fev '15

Ola. Gostaria de saber se alguém poderia me sugerir algo para avaliar o risco, ou aonde uma doença ocorre espacialmente, mais comumente. Meus dados são constituídos de coordenadas geográficas de cidades, na forma de latitude e longitude. Dai para cada cidade eu tenho o número de casos de uma doença para um total de vaquinhas observadas. E calculo a prevalência como os casos pelo total de vaquinhas observadas. Então eu tenho esses dados, e gostaria de fazer um mapinha, mostrando espacialmente se existe uma área que tem maior ocorrência, maior chance de ocorrência. Apenas para explorar os dados a principio. Segue um pequeno exemplo de como estão os dados. ######################################################### library(MASS) set.seed(1) dados<-data.frame(lat=sample(1:10,20,replace=T), lon=sample(1:10,20,replace=T), casos=rpois(20,5), total=rpois(20,60) ) dados$prevalencia<-dados$casos/dados$total #Eu gostaria de fazer uma figura mais ou menos como essa, mas levando em consideração as prevalências. contorno<-kde2d(dados$lat,dados$lon) contour(contorno) ############################################################# Alguém tem alguma sugestão? Eu não sei nem o que começar a ler exatamente para Agradeço desde ja a atenção. -- Grato Augusto C. A. Ribas Site Pessoal: http://recologia.com.br/ <http://augustoribas.heliohost.org> Github: https://github.com/Squiercg Lattes: http://lattes.cnpq.br/7355685961127056

3 3

Re: [R-br] GGPLOT
by Rafael Tieppo 24 Fev '15

24 Fev '15

DF <- data.frame(A = rnorm(40), B=rnorm(40)) #tamanho normal ggplot()+geom_point(data= DF, aes(x=A, y=B)) +ggtitle("Teste") #aumentar fonte ggplot()+geom_point(data= DF, aes(x=A, y=B))+theme (axis.title = element_text (size =25)) +ggtitle("Teste") +theme (title = element_text (size =25)) Rafael Tieppo State University of Mato Grosso - Department of Agricultural Engineering site: http://www2.unemat.br/rafaeltieppo blog: https://sistemasagricolas.wordpress.com On Monday, February 23, 2015 4:48 PM, "r-br-request(a)listas.c3sl.ufpr.br" <r-br-request(a)listas.c3sl.ufpr.br> wrote: Enviar submissões para a lista de discussão R-br para r-br(a)listas.c3sl.ufpr.br Para se cadastrar ou descadastrar via WWW, visite o endereço https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br ou, via email, envie uma mensagem com a palavra 'help' no assunto ou corpo da mensagem para r-br-request(a)listas.c3sl.ufpr.br Você poderá entrar em contato com a pessoa que gerencia a lista pelo endereço r-br-owner(a)listas.c3sl.ufpr.br Quando responder, por favor edite sua linha Assunto assim ela será mais específica que "Re: Contents of R-br digest..." Tópicos de Hoje: 1. Re: Vídeo Aula R (Carlos Andrade) 2. Re: Vídeo Aula R (Téo Calvo) 3. Re: Vídeo Aula R (Flavia Batista Gomes - Embrapa Amazonia Ocidental - CPAA) 4. GGPLOT (Edson Lira) 5. Re: GGPLOT (Fernando Gama) 6. Re: GGPLOT (Tropidurus Torquatus) 7. Re: GGPLOT (Edson Lira) ---------------------------------------------------------------------- Message: 1 Date: Mon, 23 Feb 2015 14:04:49 -0300 From: Carlos Andrade <prf.cantonio(a)gmail.com> To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] Vídeo Aula R Message-ID: <CA+_U+LzVNaaa7m5-f0W+P7q-v0Aw7AqnDH0Js9O1ou7ngHhwxg(a)mail.gmail.com> Content-Type: text/plain; charset="utf-8" Pedro, Obrigado pelas dicas. Em 23 de fevereiro de 2015 10:56, Pedro Emmanuel Alvarenga Americano do Brasil <emmanuel.brasil(a)gmail.com> escreveu: > Carlos, > > Nunca consegui migrar totalmente do EpiData 3.1 para o EpiData versao XML. > No windows, ele fica travando em horas inapropriadas, não consigo fazer > algumas tarefas que julgo relevantes, e nem de perto tem os mesmos recursos > que o Epidata 3.1 tem quanto aos controles. A grande desvantagem do 3.1 é > que o acesso aos dados não são hierarquizados, ou seja, qualquer um com > acesso ao banco de dados pode modifica-lo. Ha cerca de dois anos comecei > uma migração para o RedCap (http://project-redcap.org/) que é o que eu > sugiro para todos atualmente que tenham um suporte de TI e um servidor que > possa instalar. Para os alunos de pos-graduação, que geralmente conduzem > sozinhos todos os passos do caminho dos dados, eu continuo recomendando o > EpiData 3.1. Salvo em algumas situações eu passo a recomendar o RedCap, > porque tenho acesso a esse programa na instituição que trabalho. > > Recentemente dei uma olhada no sítio do CSpro, e parece que la mesmo eles > já colocaram uns tutoriais em vídeos para a versão laptop e para a versão > android. > > http://www.census.gov/population/international/training/csprovideos.html > > Enquanto a gerar um formulario em papel que não seja tosco, o único que já > experimentei e ficou de fato muito bom, foi o Teleform. Mas o teleform > possui uma dificuldade de inserção dos dados a distância, é bem complicado > configurar pra funcionar em estudos multicentricos e é também mais > complicado fazer o data management porque o programa fica instalado num > computador local. Mas nada impede de fazer um tratamento "embeleze" nos > seus formularios com o editor de texto de sua preferência, inclusive > colocando o timbre a da sua instituição e coisas que usualmente são > relvantes para o controle no papel como "data da digitação" "nome do > profissional que preencheu", um cabeçalho com o identificador em todas as > folhas e coisas assim. > > Mais uma vez, pesando os pros e os contras, atualmente eu venho > recomendando o RedCap (ahhh e funciona bem com R gerando os relatórios do > andamento da pesquisa, ou seja, o R consegue conectar no RedCap e baixar > uma cópia dos dados, dos dicionários, da lista de usúarios, da estrutura > dos dados e etc). > > Espero que tenha ajudado. Abraço forte, > > > Pedro Brasil > > Em 23 de fevereiro de 2015 10:21, Carlos Andrade <prf.cantonio(a)gmail.com> > escreveu: > > Olá, Pedro. >> >> Já experimentei a integração EpiData com R. Na versão EpiData 3.1 >> consegui fazer um formulário para digitação de dados coletados em papel e >> dar entrada com os dados no R. Ficou muito tosco. Com a versão EpiData >> -manager/entry verifiquei que sofisticou mas não consegui montar um >> formulário (máscara de entrada). >> Você poderia indicar links de materiais mais "passo a passo" de criação >> de máscara de entrada de dados seja para EpiData ou CSPro, que também achei >> interessante, mas só tem para Windows. >> >> Agradeço antecipadamente. >> >> Em 23 de fevereiro de 2015 08:37, Pedro Emmanuel Alvarenga Americano do >> Brasil <emmanuel.brasil(a)gmail.com> escreveu: >> >> Ei teo, >>> >>> Eu leciono R ha dois anos para pos graduandos da area da saude. Por >>> acaso eu estava gravando video aulas de R com a intençao de mudar o formato >>> de oficinas presenciais para uma um curso semi-presencial quando vi o seu >>> email. Assisti somente a primeira aula sua e achei bem legal e bem parecido >>> com que estou fazendo. As video aulas ainda nao estao la, mas estarao em >>> breve, por outro lado o material escrito esta la desde 2013. >>> >>> http://blog.ipec.fiocruz.br/lapclin-chagas/ensino/computacao/ >>> >>> Parabens pela iniciativa. >>> >>> Abraço forte, >>> >>> Pedro Brasil via Android (:)= >>> Em 17/02/2015 18:42, "Téo Calvo" <teocalvo2(a)gmail.com> escreveu: >>> >>>> Olá caros, tudo bem? >>>> >>>> Dei início a um novo projeto, estou gravando video aulas de R para >>>> iniciantes. >>>> >>>> Foco principal é apresentar a linguagem a alunos de 1o e 2o Ano de >>>> Estatística, assim como curisosos e pesquisadores de outras áreas. >>>> >>>> >>>> https://www.youtube.com/watch?v=qtmeG_26_Pw&list=PLOUU7axoXx0r1n-ZSgE-iYNJW… >>>> >>>> Espero que colaborar com o desenvolvimento de futuros pesquisadores e >>>> também profissionais do mercado. >>>> >>>> Conto com sugestões e críticas. >>>> >>>> Att Téo Calvo. >>>> >>>> _______________________________________________ >>>> 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. >>>> >>> >>> _______________________________________________ >>> 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. >>> >> >> >> >> -- >> Atenciosamente, >> >> Prof. Carlos A. S. de Andrade >> LAPEA - Laboratório de Pesquisa em Economia Aplicada e Engenharia de >> Produção >> Universidade Federal de Campina Grande. >> Centro de Humanidades >> Unidade Acadêmica de Economia >> >> _______________________________________________ >> 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. >> > > > _______________________________________________ > 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. > -- Atenciosamente, Prof. Carlos A. S. de Andrade LAPEA - Laboratório de Pesquisa em Economia Aplicada e Engenharia de Produção Universidade Federal de Campina Grande. Centro de Humanidades Unidade Acadêmica de Economia -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/c3246adc/atta…> ------------------------------ Message: 2 Date: Mon, 23 Feb 2015 16:29:52 -0300 From: Téo Calvo <teocalvo2(a)gmail.com> To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] Vídeo Aula R Message-ID: <CAGeP_1K5HfsNSVW2wRTLD1b0-D9zTPfuhqMm6SDgC=MT6aR8-w(a)mail.gmail.com> Content-Type: text/plain; charset="utf-8" Olá a todos novamente. Fico contente com os comentários dos colegas. Todo este apoio tem sido importante para a motivação em continuar desenvolvendo material para as aulas e pensar em exemplos práticos para os alunos que estão começando a ter contato com R. Continuo a postar os vídeo sempre que posso. Peço que os colegas se inscrevam no canal para que recebam a notificação de novos vídeos, assim não preciso gerar Spawn na lista e em outras redes sociais. Muito bacana Pedro! Espero que minhas aulas possam ajuda-lo de alguma forma. Muito obrigado novamente. Att Téo Calvo. Em 23 de fevereiro de 2015 08:37, Pedro Emmanuel Alvarenga Americano do Brasil <emmanuel.brasil(a)gmail.com> escreveu: > Ei teo, > > Eu leciono R ha dois anos para pos graduandos da area da saude. Por acaso > eu estava gravando video aulas de R com a intençao de mudar o formato de > oficinas presenciais para uma um curso semi-presencial quando vi o seu > email. Assisti somente a primeira aula sua e achei bem legal e bem parecido > com que estou fazendo. As video aulas ainda nao estao la, mas estarao em > breve, por outro lado o material escrito esta la desde 2013. > > http://blog.ipec.fiocruz.br/lapclin-chagas/ensino/computacao/ > > Parabens pela iniciativa. > > Abraço forte, > > Pedro Brasil via Android (:)= > Em 17/02/2015 18:42, "Téo Calvo" <teocalvo2(a)gmail.com> escreveu: > >> Olá caros, tudo bem? >> >> Dei início a um novo projeto, estou gravando video aulas de R para >> iniciantes. >> >> Foco principal é apresentar a linguagem a alunos de 1o e 2o Ano de >> Estatística, assim como curisosos e pesquisadores de outras áreas. >> >> >> https://www.youtube.com/watch?v=qtmeG_26_Pw&list=PLOUU7axoXx0r1n-ZSgE-iYNJW… >> >> Espero que colaborar com o desenvolvimento de futuros pesquisadores e >> também profissionais do mercado. >> >> Conto com sugestões e críticas. >> >> Att Téo Calvo. >> >> _______________________________________________ >> 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. >> > > _______________________________________________ > 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. > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/e9692112/atta…> ------------------------------ Message: 3 Date: Mon, 23 Feb 2015 17:04:23 -0300 (BRT) From: Flavia Batista Gomes - Embrapa Amazonia Ocidental - CPAA <flavia.b.gomes(a)embrapa.br> To: r-br(a)listas.c3sl.ufpr.br Subject: Re: [R-br] Vídeo Aula R Message-ID: <1621180510.1586048.1424721863692.JavaMail.root(a)embrapa.br> Content-Type: text/plain; charset="iso-8859-1" Oi Téo, Ainda não vi seus vídeos mas acessarei com certeza, já sugiro vc gravar um sobre análise de Probit e cálculo de CL50. Será muito útil. Flávia Batista ----- Mensagem original ----- De: "Téo Calvo" <teocalvo2(a)gmail.com> Para: r-br(a)listas.c3sl.ufpr.br Enviadas: Segunda-feira, 23 de fevereiro de 2015 15:29:52 Assunto: Re: [R-br] Vídeo Aula R Olá a todos novamente. Fico contente com os comentários dos colegas. Todo este apoio tem sido importante para a motivação em continuar desenvolvendo material para as aulas e pensar em exemplos práticos para os alunos que estão começando a ter contato com R. Continuo a postar os vídeo sempre que posso. Peço que os colegas se inscrevam no canal para que recebam a notificação de novos vídeos, assim não preciso gerar Spawn na lista e em outras redes sociais. Muito bacana Pedro! Espero que minhas aulas possam ajuda-lo de alguma forma. Muito obrigado novamente. Att Téo Calvo. Em 23 de fevereiro de 2015 08:37, Pedro Emmanuel Alvarenga Americano do Brasil < emmanuel.brasil(a)gmail.com > escreveu: Ei teo, Eu leciono R ha dois anos para pos graduandos da area da saude. Por acaso eu estava gravando video aulas de R com a intençao de mudar o formato de oficinas presenciais para uma um curso semi-presencial quando vi o seu email. Assisti somente a primeira aula sua e achei bem legal e bem parecido com que estou fazendo. As video aulas ainda nao estao la, mas estarao em breve, por outro lado o material escrito esta la desde 2013. http://blog.ipec.fiocruz.br/lapclin-chagas/ensino/computacao/ Parabens pela iniciativa. Abraço forte, Pedro Brasil via Android (:)= Em 17/02/2015 18:42, "Téo Calvo" < teocalvo2(a)gmail.com > escreveu: <blockquote> Olá caros, tudo bem? Dei início a um novo projeto, estou gravando video aulas de R para iniciantes. Foco principal é apresentar a linguagem a alunos de 1o e 2o Ano de Estatística, assim como curisosos e pesquisadores de outras áreas. https://www.youtube.com/watch?v=qtmeG_26_Pw&list=PLOUU7axoXx0r1n-ZSgE-iYNJW… Espero que colaborar com o desenvolvimento de futuros pesquisadores e também profissionais do mercado. Conto com sugestões e críticas. Att Téo Calvo. _______________________________________________ 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. _______________________________________________ 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. </blockquote> _______________________________________________ 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. ____________________________________________________________________________ Aviso de confidencialidade Esta mensagem da Empresa Brasileira de Pesquisa Agropecuaria (Embrapa), empresa publica federal regida pelo disposto na Lei Federal no. 5.851, de 7 de dezembro de 1972, e enviada exclusivamente a seu destinatario e pode conter informacoes confidenciais, protegidas por sigilo profissional. Sua utilizacao desautorizada e ilegal e sujeita o infrator as penas da lei. Se voce a recebeu indevidamente, queira, por gentileza, reenvia-la ao emitente, esclarecendo o equivoco. Confidentiality note This message from Empresa Brasileira de Pesquisa Agropecuaria (Embrapa), a government company established under Brazilian law (5.851/72), is directed exclusively to its addressee and may contain confidential data, protected under professional secrecy rules. Its unauthorized use is illegal and may subject the transgressor to the law's penalties. If you are not the addressee, please send it back, elucidating the failure. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/c99fb618/atta…> ------------------------------ Message: 4 Date: Mon, 23 Feb 2015 20:48:03 +0000 (UTC) From: Edson Lira <edinhoestat(a)yahoo.com.br> To: R-br Lista <r-br(a)listas.c3sl.ufpr.br> Subject: [R-br] GGPLOT Message-ID: <1173242903.5170236.1424724483802.JavaMail.yahoo(a)mail.yahoo.com> Content-Type: text/plain; charset="utf-8" Meus caros amigos, estou tentando usar um exemplo de aplicação de MCA, script abaixo: #Usando MCA# load packagesrequire(FactoMineR)require(ggplot2) # load data teadata(tea)teanames(tea)# select these columnsnewtea = tea[, c("Tea", "How", "how", "sugar", "where", "always")] # take a peekhead(newtea)names(newtea)str(newtea)cats = apply(newtea, 2, function(x) nlevels(as.factor(x)))cats # apply MCAmca1 = MCA(newtea, graph = FALSE) # list of resultsmca1 # table of eigenvaluesmca1$eig #We can use the package "ggplot2()" to get a nice plot:# data frame with variable coordinatesmca1_vars_df = data.frame(mca1$var$coord, Variable = rep(names(cats), cats)) # data frame with observation coordinatesmca1_obs_df = data.frame(mca1$ind$coord) par(cex.axis=0.5)# plot of variable categoriesggplot(data=mca1_vars_df,cex.axis=0.5, cex.lab=0.5, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df))) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_text(aes(colour=Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") # MCA plot of observations and categoriesggplot(data = mca1_obs_df, aes(x = Dim.1, y = Dim.2)) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_point(colour = "gray50", alpha = 0.7) + geom_density2d(colour = "gray80") + geom_text(data = mca1_vars_df, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df), colour = Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") + scale_colour_discrete(name = "Variable") Como faço para mudar o tamanho da fonte do título, dos eixos, legenda, etc.? Tentei os comandos cex, cex.axis, cex.lab, mas não consegui. Alguém tem alguma sugestão? [ ]'s.Edson Lira Estatístico Manaus-Amazonas -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/d95b2c4f/atta…> ------------------------------ Message: 5 Date: Mon, 23 Feb 2015 17:55:49 -0300 From: Fernando Gama <f.fabiogama88(a)gmail.com> To: r-br(a)listas.c3sl.ufpr.br, Edson Lira <edinhoestat(a)yahoo.com.br> Subject: Re: [R-br] GGPLOT Message-ID: <CAOwqRysTxYL0da4xHbOo3rUU68dJ8z3VTFP9Db=LuhQeH2Ahog(a)mail.gmail.com> Content-Type: text/plain; charset="utf-8" Olá Edson boa tarde, meu caro, não sei se esssa é a melhor solução mas você poderia utilizar text(). Utilizei nos meus scripts e atendeu minhas expectativas: a library da função pode ser encontrada neste link: http://stat.ethz.ch/R-manual/R-devel/library/graphics/html/text.html abraços 2015-02-23 17:48 GMT-03:00 Edson Lira <edinhoestat(a)yahoo.com.br>: > Meus caros amigos, estou tentando usar um exemplo de aplicação de MCA, > script abaixo: > > #Usando MCA > # load packages > require(FactoMineR) > require(ggplot2) > > # load data tea > data(tea) > tea > names(tea) > # select these columns > newtea = tea[, c("Tea", "How", "how", "sugar", "where", "always")] > > # take a peek > head(newtea) > names(newtea) > str(newtea) > cats = apply(newtea, 2, function(x) nlevels(as.factor(x))) > cats > > # apply MCA > mca1 = MCA(newtea, graph = FALSE) > > # list of results > mca1 > > # table of eigenvalues > mca1$eig > > #We can use the package "ggplot2()" to get a nice plot: > # data frame with variable coordinates > mca1_vars_df = data.frame(mca1$var$coord, Variable = rep(names(cats), cats > )) > > # data frame with observation coordinates > mca1_obs_df = data.frame(mca1$ind$coord) > > > par(cex.axis=0.5) > # plot of variable categories > ggplot(data=mca1_vars_df,cex.axis=0.5, cex.lab=0.5, > aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df))) + > geom_hline(yintercept = 0, colour = "gray70") + > geom_vline(xintercept = 0, colour = "gray70") + > geom_text(aes(colour=Variable)) + > ggtitle("MCA plot of variables using R package FactoMineR") > > > # MCA plot of observations and categories > ggplot(data = mca1_obs_df, aes(x = Dim.1, y = Dim.2)) + > geom_hline(yintercept = 0, colour = "gray70") + > geom_vline(xintercept = 0, colour = "gray70") + > geom_point(colour = "gray50", alpha = 0.7) + > geom_density2d(colour = "gray80") + > geom_text(data = mca1_vars_df, > aes(x = Dim.1, y = Dim.2, > label = rownames(mca1_vars_df), colour = Variable)) + > ggtitle("MCA plot of variables using R package FactoMineR") + > scale_colour_discrete(name = "Variable") > > > Como faço para mudar o tamanho da fonte do título, dos eixos, legenda, > etc.? Tentei os comandos cex, cex.axis, cex.lab, mas não consegui. > > > Alguém tem alguma sugestão? > > > > [ ]'s. > Edson Lira > Estatístico > Manaus-Amazonas > > _______________________________________________ > 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. > -- Att, Fernando Gama da Mata Vale of Institute Technology -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/6145791f/atta…> ------------------------------ Message: 6 Date: Mon, 23 Feb 2015 18:06:54 -0300 From: Tropidurus Torquatus <t.torquatus(a)gmail.com> To: r-br(a)listas.c3sl.ufpr.br, Edson Lira <edinhoestat(a)yahoo.com.br> Subject: Re: [R-br] GGPLOT Message-ID: <32AED325-B4B3-4AF9-84E1-CDB3560C9F92(a)gmail.com> Content-Type: text/plain; charset="windows-1252" Edson, Para construir meus gráficos com ggplot2 normalmente eu uso e abuso desses 2 sites: Acho que esse vai atender a suas dúvidas: http://www.cookbook-r.com/Graphs/ <http://www.cookbook-r.com/Graphs/> Esse abaixo é completo? mas pode gerar mais dúvidas: http://ggplot2.org <http://ggplot2.org/> Se não me falha a memória, podem ser usados duas formas? alteração direta na inserção dos dados mas aparente não seria a forma que você está utilizando (xlab/ylab), outra forma alterando o ?theme?. > Em 23/02/2015, à(s) 17:48, Edson Lira <edinhoestat(a)yahoo.com.br> escreveu: > > Meus caros amigos, estou tentando usar um exemplo de aplicação de MCA, script abaixo: > > #Usando MCA > # load packages > require(FactoMineR) > require(ggplot2) > > # load data tea > data(tea) > tea > names(tea) > # select these columns > newtea = tea[, c("Tea", "How", "how", "sugar", "where", "always")] > > # take a peek > head(newtea) > names(newtea) > str(newtea) > cats = apply(newtea, 2, function(x) nlevels(as.factor(x))) > cats > > # apply MCA > mca1 = MCA(newtea, graph = FALSE) > > # list of results > mca1 > > # table of eigenvalues > mca1$eig > > #We can use the package "ggplot2()" to get a nice plot: > # data frame with variable coordinates > mca1_vars_df = data.frame(mca1$var$coord, Variable = rep(names(cats), cats)) > > # data frame with observation coordinates > mca1_obs_df = data.frame(mca1$ind$coord) > > > par(cex.axis=0.5) > # plot of variable categories > ggplot(data=mca1_vars_df,cex.axis=0.5, cex.lab=0.5, > aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df))) + > geom_hline(yintercept = 0, colour = "gray70") + > geom_vline(xintercept = 0, colour = "gray70") + > geom_text(aes(colour=Variable)) + > ggtitle("MCA plot of variables using R package FactoMineR") > > > # MCA plot of observations and categories > ggplot(data = mca1_obs_df, aes(x = Dim.1, y = Dim.2)) + > geom_hline(yintercept = 0, colour = "gray70") + > geom_vline(xintercept = 0, colour = "gray70") + > geom_point(colour = "gray50", alpha = 0.7) + > geom_density2d(colour = "gray80") + > geom_text(data = mca1_vars_df, > aes(x = Dim.1, y = Dim.2, > label = rownames(mca1_vars_df), colour = Variable)) + > ggtitle("MCA plot of variables using R package FactoMineR") + > scale_colour_discrete(name = "Variable") > > > Como faço para mudar o tamanho da fonte do título, dos eixos, legenda, etc.? Tentei os comandos cex, cex.axis, cex.lab, mas não consegui. > > > Alguém tem alguma sugestão? > > > > [ ]'s. > Edson Lira > Estatístico > Manaus-Amazonas > _______________________________________________ > 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. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/9b691c0e/atta…> ------------------------------ Message: 7 Date: Mon, 23 Feb 2015 21:09:55 +0000 (UTC) From: Edson Lira <edinhoestat(a)yahoo.com.br> To: Tropidurus Torquatus <t.torquatus(a)gmail.com>, "r-br(a)listas.c3sl.ufpr.br" <r-br(a)listas.c3sl.ufpr.br> Subject: Re: [R-br] GGPLOT Message-ID: <390107215.4582006.1424725795582.JavaMail.yahoo(a)mail.yahoo.com> Content-Type: text/plain; charset="utf-8" Ok vou tentar. [ ]'s.Edson Lira Estatístico Manaus-Amazonas Em Segunda-feira, 23 de Fevereiro de 2015 17:07, Tropidurus Torquatus <t.torquatus(a)gmail.com> escreveu: Edson, Para construir meus gráficos com ggplot2 normalmente eu uso e abuso desses 2 sites: Acho que esse vai atender a suas dúvidas: http://www.cookbook-r.com/Graphs/ Esse abaixo é completo? mas pode gerar mais dúvidas: http://ggplot2.org Se não me falha a memória, podem ser usados duas formas? alteração direta na inserção dos dados mas aparente não seria a forma que você está utilizando (xlab/ylab), outra forma alterando o ?theme?. Em 23/02/2015, à(s) 17:48, Edson Lira <edinhoestat(a)yahoo.com.br> escreveu: Meus caros amigos, estou tentando usar um exemplo de aplicação de MCA, script abaixo: #Usando MCA# load packagesrequire(FactoMineR)require(ggplot2) # load data teadata(tea)teanames(tea)# select these columnsnewtea = tea[, c("Tea", "How", "how", "sugar", "where", "always")] # take a peekhead(newtea)names(newtea)str(newtea)cats = apply(newtea, 2, function(x) nlevels(as.factor(x)))cats # apply MCAmca1 = MCA(newtea, graph = FALSE) # list of resultsmca1 # table of eigenvaluesmca1$eig #We can use the package "ggplot2()" to get a nice plot:# data frame with variable coordinatesmca1_vars_df = data.frame(mca1$var$coord, Variable = rep(names(cats), cats)) # data frame with observation coordinatesmca1_obs_df = data.frame(mca1$ind$coord) par(cex.axis=0.5)# plot of variable categoriesggplot(data=mca1_vars_df,cex.axis=0.5, cex.lab=0.5, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df))) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_text(aes(colour=Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") # MCA plot of observations and categoriesggplot(data = mca1_obs_df, aes(x = Dim.1, y = Dim.2)) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_point(colour = "gray50", alpha = 0.7) + geom_density2d(colour = "gray80") + geom_text(data = mca1_vars_df, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df), colour = Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") + scale_colour_discrete(name = "Variable") Como faço para mudar o tamanho da fonte do título, dos eixos, legenda, etc.? Tentei os comandos cex, cex.axis, cex.lab, mas não consegui. Alguém tem alguma sugestão? [ ]'s.Edson Lira Estatístico Manaus-Amazonas_______________________________________________ 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. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150223/8d9d81b3/atta…> ------------------------------ Subject: Legenda do Digest _______________________________________________ R-br mailing list R-br(a)listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br ------------------------------ Fim da Digest R-br, volume 50, assunto 15 *****************************************

1 0

Vídeo Aula R
by Téo Calvo 24 Fev '15

24 Fev '15

Olá caros, tudo bem? Dei início a um novo projeto, estou gravando video aulas de R para iniciantes. Foco principal é apresentar a linguagem a alunos de 1o e 2o Ano de Estatística, assim como curisosos e pesquisadores de outras áreas. https://www.youtube.com/watch?v=qtmeG_26_Pw&list=PLOUU7axoXx0r1n-ZSgE-iYNJW… Espero que colaborar com o desenvolvimento de futuros pesquisadores e também profissionais do mercado. Conto com sugestões e críticas. Att Téo Calvo.

8 12

GGPLOT
by Edson Lira 23 Fev '15

23 Fev '15

Meus caros amigos, estou tentando usar um exemplo de aplicação de MCA, script abaixo: #Usando MCA# load packagesrequire(FactoMineR)require(ggplot2) # load data teadata(tea)teanames(tea)# select these columnsnewtea = tea[, c("Tea", "How", "how", "sugar", "where", "always")] # take a peekhead(newtea)names(newtea)str(newtea)cats = apply(newtea, 2, function(x) nlevels(as.factor(x)))cats # apply MCAmca1 = MCA(newtea, graph = FALSE) # list of resultsmca1 # table of eigenvaluesmca1$eig #We can use the package "ggplot2()" to get a nice plot:# data frame with variable coordinatesmca1_vars_df = data.frame(mca1$var$coord, Variable = rep(names(cats), cats)) # data frame with observation coordinatesmca1_obs_df = data.frame(mca1$ind$coord) par(cex.axis=0.5)# plot of variable categoriesggplot(data=mca1_vars_df,cex.axis=0.5, cex.lab=0.5, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df))) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_text(aes(colour=Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") # MCA plot of observations and categoriesggplot(data = mca1_obs_df, aes(x = Dim.1, y = Dim.2)) + geom_hline(yintercept = 0, colour = "gray70") + geom_vline(xintercept = 0, colour = "gray70") + geom_point(colour = "gray50", alpha = 0.7) + geom_density2d(colour = "gray80") + geom_text(data = mca1_vars_df, aes(x = Dim.1, y = Dim.2, label = rownames(mca1_vars_df), colour = Variable)) + ggtitle("MCA plot of variables using R package FactoMineR") + scale_colour_discrete(name = "Variable") Como faço para mudar o tamanho da fonte do título, dos eixos, legenda, etc.? Tentei os comandos cex, cex.axis, cex.lab, mas não consegui. Alguém tem alguma sugestão? [ ]'s.Edson Lira Estatístico Manaus-Amazonas

4 4

Pacote precintcon
by Lucas Venezian Povoa 20 Fev '15

20 Fev '15

Prezados, Toma a liberdade de divulgar nessa lista um novo pacote do R chamado *precintcon*, o qual foi publicado hoje no CRAN. Eu sou o autor e mantenedor desse pacote, cuja finalidade é analisar concentração, intensidade e anomalia de séries de precipitação (diárias e/ou mensais). Os principais índices implementados nesse pacote são: * Percent of Normal (PN) * Deciles * Concentration Index (CI) * Precipitation Concentration Index (PCI) * Rainfall Anomaly Index (RAI) * Standardized Precipitation Index (SPI) Além disso, são disponibilizadas várias funções para plotagem de séries de precipitação definidas com base no pacote *ggplot2*. Qualquer sugestão, crítica ou problema encontrado me enviem através do site do github (https://www.github.com/lucasvenez/precintcon) referente ao pacote. Grato pela atenção. Lucas

1 0