| Ambos lados da revisão anterior
Revisão anterior
Próxima revisão
|
|
pessoais:walmes [2011/02/01 17:08] walmes |
| Revisão anterior
|
|
pessoais:walmes [2018/02/07 11:55] (atual) walmes [section 5] |
|
| ====== Walmes Marques Zeviani ====== |
//"Experiência não é o que acontece com você, mas o que você fez com o que lhe aconteceu."// (Aldous Huxley) |
|
| //"Experiência não é o que acontece com você, mas o que você fez com o que lhe aconteceu."// (Aldous Huxley) |
| |
| //"Feliz é aquele que transfere o que sabe e aprende o que ensina."// (Cora Coralina) |
| |
| //"O que você sabe não tem valor, o valor está no que você faz com o que sabe."// (Bruce Lee) |
| |
| //"Compreender que há outros pontos de vista é o início da sabedoria."// (Campbell) |
| |
| //"Quem não sabe o que busca não identifica o que acha."// (Immanuel Kant) |
| |
| //"Não sou aquele que sabe, mas aquele que busca."// (Herman Hesse) |
| |
| //"A verdade é circunstancial."// (Desconhecido) |
| |
| //"Quem reconhece um problema tem um problema a menos."// (Desconhecido) |
| |
| //"Conforme-se e o mundo será sempre igual."// (Campanha Institucional Futura 2015) |
| |
| //"Understanding is more important than automation."// (John Emerson) |
| |
| |
[[http://buscatextuallattes.cnpq.br/buscatextual/visualizacv.jsp?id=K4260591E04410617539281650|{{ :pessoais:walmes:lattestext.gif|}}]] |
| [[http://scholar.google.com.br/citations?hl=EN&user=pb-91n8AAAAJ&view_op=list_works|Perfil no Google Scholar]] |
| \\ |
| \\ |
|
Engenheiro Agronômo pela Universidade Federal da Grande Dourados (2007)e , Mestre (2008-2009) e Doutor (2010-2013) em Estatística & Experimentação Agropecuária pela Universidade Federal de Lavras(2009). Doutorando do Programa de Pós-Graduação em Estatística & Experimentação Agropecuária - Professor Assistente I do Departamento de Estatística da Universidade Federal do Paraná (aprovado por Concurso e contratado em Julho 2010) onde atualmente leciona. |
| \\ |
| \\ |
| /* {{ :pessoais:walmes:perfil.jpg?150|}} */ |
| /*{{ :pessoais:walmes:perfil2.gif?150|}} */ |
| {{ :pessoais:walmes:walmes.jpg?200|}} |
| |
| {{ ::leg.png?nolink&200 |}} |
\\ |
| \\ |
''==========================================================================\\ |
Walmes Marques Zeviani\\ |
LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)\\ |
Departamento de Estatística - Universidade Federal do Paraná\\ |
fone: (+55) 41 3361 3573\\ |
VoIP: (3361 3600) 1053 1173\\ |
e-mail: walmes@ufpr.br\\ |
twitter: @walmeszeviani\\ |
homepage: http://www.leg.ufpr.br/~walmes\\ |
==========================================================================''\\ |
| \\ |
|
| <code> |
| ========================================================================== |
| Walmes Marques Zeviani |
| LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) |
| Departamento de Estatística - Universidade Federal do Paraná |
| Edifício da Administração - 3º andar - Centro Politécnico |
| Curitiba - PR CEP: 81.531-990 |
| Bairro: Jardim das Américas Caixa Postal: 19.081 |
| fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 |
| e-mail: walmes@ufpr.br twitter: @walmeszeviani |
| homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 |
| ========================================================================== |
| </code> |
|
=---- |
==== Dissertação de Mestrado ===== |
|
| **Avaliação de modelos de regressão não linear na cinética de liberação de potássio de resíduos orgânicos** |
|
| Aprovada em 18 de setembro de 2009 \\ |
|
===== Atividades regulares semanais ===== |
{{ :pessoais:walmes:calendar.gif|}}---- |
|
^ 1° semestre 2011 ^^^^^^ |
^ HORÁRIO ^ SEG ^ TER ^ QUA ^ QUI ^ SEX ^ |
|08:00 - 09:00| | | | | | |
|09:00 - 10:00| | | | x | | |
|10:20 - 11:00| x | | x | | | |
|11:00 - 12:00| x | | x | | | |
|12:00 - 13:30| | | | | | |
|13:30 - 14:00| x | | x | | | |
|14:00 - 15:30| x | | x | | | |
|15:30 - 16:00| | | | | | |
|16:00 - 17:30| | | | | | |
|17:30 - 18:00| | x | | | | |
|18:00 - 19:30| | x | | | | |
|19:30 - 20:00| | | | | | |
|20:00 - 21:00| x | | | | | |
|21:30 - 22:00| | | | | x | |
|22:00 - 23:30| | | | | x | ==== Tese de Doutorado ==== |
|
{{url>Título: **Parametrizações interpretáveis em modelos não lineares** |
[[http://mapswww.googleleg.ptufpr.br/maps?f=q&source=s_q&hl=pt-PT&geocode=&q=Obras+Campos+Rocha&sll=39~walmes/docs/WalmesTese.639538,-7pdf|{{:pessoais:walmes:download.849731&sspn=8.777984,19.775391&ie=UTF8&cid=4466286134107273555&s=AARTsJqshAMtv246X2D6fTPfboTrXBAdmA&ll=41.315917,-7.750683&spn=0.02901,0.051498&z=14&iwloc=A&output=embed"jpg?70|}}]] |
|
http://maps.google.pt/maps?f=q&source=s_q&hl=pt-PT&geocode=&q=Obras+Campos+Rocha&sll=39.639538,-7.849731&sspn=8.777984,19.775391&ie=UTF8&cid=4466286134107273555&s=AARTsJqshAMtv246X2D6fTPfboTrXBAdmA&ll=41.315917,-7.750683&spn=0.02901,0.051498&z=14&iwloc=A&output=embed |
|
===== Dicas computacionais =====Capítulo 1: PROCEDIMENTO PARA OBTER PARAMETRIZAÇÕES |
| INTERPRETÁVEIS EM MODELOS NÃO LINEARES. |
| Modelos de regressão não linear são considerados quando existe algum |
| conhecimento preliminar sobre a relação entre variáveis. Tal conhecimento pode |
| ser a respeito da própria natureza dos dados, uma equação diferencial e até mesmo |
| a forma do diagrama de dispersão entre as variáveis. Em geral, seus parâmetros |
| têm interpretação. Além disso, parâmetros de interesse, expressos como função |
| dos parâmetros do modelo, são alvos de investigação. Para isso, o método delta, |
| simulação Monte Carlo e procedimentos bootstrap são procedimentos adotados |
| para fazer inferência. Além disso, uma reparametrização pode ser aplicada ao mo- |
| delo de forma a representar esses parâmetros de interesse. Além de melhorar a |
| interpretação do modelo, a presença do parâmetro alvo estende as possibilidades |
| com relação a especificação de modelos e inferência estatística. O objetivo com |
| esse trabalho é sistematizar o procedimento de aplicar reparametrizações. Ênfase |
| é dada em modelos não lineares considerados em Ciências Agrárias. Uma lista |
| com 17 modelos reparametrizados é fornecida. Breve discussão sobre os métodos |
| de inferência é feita. |
|
* Site para produzir **expressões matemáticas em latex** ([[http://www.codecogs.com/latex/eqneditor.php]]).\\ Permite a construção online de expressões matemáticas em código Latex, que podem ser copiadas e coladas no seu editor. O usuário tem opção de usar os menus com expressões pré-definidas, tais como matrizes, sistema de equações, derivadas, somatórios, simbologia de conjuntos, letras gregas, etc. Expressões comuns estão organizadas no botão "exemplos". |
* Download do **LaTable** para confecção de tabelas para Latex ([[http://www.leg.ufpr.br/~walmes/docs/LaTable.exe]]).\\ A versão disponível para Download tem compatibilidade com o wine e portanto pode ser usada por usuários Linux ([[http://www.guiadohardware.net/tutoriais/usando-wine/|usando o wine]]). Nos casos em as tabelas estão prontas em editores de texto (e.g. OpenOffice-Writer) ou em planilhas eletrônicas (e.g. OpenOffice-Calc) pode-se colar o conteúdo da tabela em um arquivo de extensão *txt e importar pelo LaTable. No LaTable é possível fazer a formatação de alinhamento de colunas e inserção linhas verticais e horizontais, usadas, em geral, para separar o cabeçalho da tabela do restante. Depois da edição é só copiar, em formato Latex, o conteúdo da tabela para área de transferência e colar no seu editor. |
* **Zotero**: plugin do Firefox para extração de meta-dados de páginas de internet para criação de referências bibliográficas ([[http://www.zotero.org/|http://www.zotero.org/]]). \\ Zotero é capaz de extrair os metadados de sites da internet e produzir referências bibliográficas em diversos formatos. Sites [[http://www.amazon.com/|Amazon.com]] (de venda de livros) e o [[http://www.sciencedirect.com/|ScienceDirect]] (para busca de artigos) são alguns dos compatíveis com o plugin. Basta fazer a busca por um livro/artigo no site que um ícone irá aparecer na sua barra de endereços. Ao clicar no ícone (que será um livro de capa azul no caso de livros) os metadados serão organizados pelo zotero. Para acessar os metadados, clica-se no nome "zotero" que fica no canto inferior direito do seu Firefox. Pode-se exportar as referências dos livros/artigos (e outros tipos de publicação) para diversos formatos, inclusive para o formato usado pelo bibtex, além de formatos para OpenOffice-Writer, html, etc. Mais detalhes consultar a documentação no site do plugin. Consulte também: [[http://technology.ptsem.edu/assets/18B0A48A-EB6E-480B-B3B7-C77E5859CE36.pdf|tutorial em pdf]], [[http://renatocolistete.wordpress.com/2009/02/12/zotero/|descrição]], [[http://www.youtube.com/watch?v=pq94aBrc0pY|video]]. |
* Para converter as figuras em formato *pdf de um diretório para *jpg e fazer um zip delas no final (dica Linux). Salvar num arquivo com extensão *sh (e.g. converter.sh), dentro do diretório das figuras, o conteúdo abaixo (o tipo de aspas é importante) |
<code> |
for file in `ls *.pdf` |
do |
convert $file `echo $file | sed 's/\.pdf$/\.jpg/'` |
done |
zip todojpg.zip *.jpg |
rm *.jpg |
</code> |
Entre no terminal do Linux. Vá para o diretório em que estão as figuras e o arquivo converter.sh (use $ cd <caminho>). Execute |
<code> |
$ chmod +x ./converter.sh |
$ converter.sh |
</code> |
No final deverá haver um zip com as figuras em *jpg. Caso não queria que as figuras em *jpg sejam removidas do diretório, exclua a última linha arquivo *sh. |
* Para fazer uma busca de uma expressão reugular dentro de uma árvore de diretórios apenas nos arquivos de determinada extensão. No caso, abaixo está ilustrada a procura dos arquivos de extensão R que possui a palavras 'try' |
<code> |
$ grep -r --include=*.R 'try' * |
</code> |
|
Trocar texto dentro Capítulo 2: MODELO NÃO LINEAR PARA O NÍVEL DE DANO |
| ECONÔMICO DA DESFOLHA NO ALGODOEIRO. |
| O efeito da desfolha sobre a qualidade e produtividade das culturas é |
| informação fundamental para definir estratégias de manejo, como intensidade e |
| frequência de pastejo e colheita até o estabelecimento de níveis de dano econô- |
| mico de forma a auxiliar decisões sobre o controle de pragas desfolhadoras. Para |
| a cultura do algodão, assim como para outras tantas, a redução da produção pela |
| desfolha pode ser representada por uma função não linear monótona não crescente. |
| Diversos modelos podem satisfazer essa restrição, no entanto, existe a preocupa- |
ção de inferir sobre o nível de dano econômico, θq , pelo ajuste de um arquivomodelo.O texto 'walmes' será substituido |
| Dados de produção-desfolha do algodoeiro em função do estágio fenológico são |
| considerados para inferir sobre o nível de dano econômico com os seguintes ob- |
| jetivos: 1) propor uma parametrização de modelo que representasse o parâmetro, |
2) avaliar parametrizações alternativas por 'zeviani' dentro meio de medidas de não linearidade, |
| 3) aplicar inferência baseada em verossimilhança, 4) selecionar um modelo para |
descrever a relação entre produção e desfolha do arquivo experIIalgodoeiro em função do estágio |
| fenológico. O modelo reparametrizado apresentou menores medidas de não linea- |
| ridade nos estágios fenológicos com pronunciada relação não linear. Nos restantes, |
| as medidas de curvatura, as correlações dos estimadores e os gráficos de perfil de |
verossimilhança indicaram que um sub-modelo deveria ser considerado.R |
|
<code> |
$ perl -i -pe 's/walmes/zeviani/;' experII.R |
</code> |
|
Para redimensionar as fotos Caítulo 3: PARAMETRIZAÇÃO DO MODELO VAN GENUCHTEN |
| PARA INFERÊNCIA SOBRE OS PARÂMETROS S E I. |
| A água é indispensável para produção das culturas pois está envolvida no |
| transporte de nutrientes, reações químicas, processos físicos e manutenção da vida |
do solo. O conhecimento sobre a curva de rentenção de água (*jpgCRA) do solo é |
| fundamental para estabelecer estratégias de manejo. A qualidade física do solo |
é depende da CRA e os parâmetros I, ou gráficos tensão do Rponto de inflexão da CRA, rs) e S , |
taxa de um diretóriovariação no ponto de inflexão, deixando as fotos considerados como indicadores da quali- |
| dade física, são parâmetros relacionados a medidas descritivas da distribuição do |
| tamanho de poros do solo. Com este trabalho, objetiva-se verificar o efeito da po- |
| sição de amostragem e profundidade do solo sobre os parâmetros I e S da CRA. |
| Para isso 1) considerou-se ANOVA simples e 2) ANOVA ponderada pela variância |
| das estimativas desses parâmetros em cada unidade experimental em comparação |
com largura 3) o uso de modelos não lineares de efeito misto em uma parametrização de640 pixels - |
senvolvida para I e mantendo proporção originalS . Nenhum dos métodos alternativos de análise foi superior ao |
| modelo não linear de efeitos mistos na parametrização desenvolvida, que apresen- |
tou intervalos mais estreitos para estimativas dos parâmetros e forçando a proporção 640x480apontou efeito de |
| posição e profundidade de coleta nos parâmetros I e S. |
|
<code> |
$ mogrify -resize 640 *.jpg |
$ mogrify *Palavras-resize 640×480! chaves**: Verossimilhança. Método delta. Medida de curvatura. Efeitos mistos. van Genuchten.jpg |
</code> |
|
<code R>**Banca de Defesa**:\\ |
#==========================================================================================Prof. Dr. Joel Augusto Muniz (Orientador) - UFLA \\ |
| Prof. Dr. Paulo Justiniano Ribeiro Jr (co-orientador) - UFPR\\ |
| Prof. Dr. Júlio da Motta Singer - IME-USP\\ |
| Prof. Dr. Júlio Silvio de Sousa Bueno Filho - UFLA\\ |
| Prof. Dr. Augusto Ramalho de Morais - UFLA\\ |
| Aprovada em 13 de maio de 2013.\\ |
|
library(gWidgetsRGtk2) |
|
da <-data.frame(x--- |
=1=== Ensino ==== |
{{ :20)pessoais:walmes:cabeca.gif| }} |
da$y <- 10*da$x/(3+da$x)+rnorm(da$x,0,0{{ :pessoais:walmes:cabeca2.2)gif| }} |
plot(y~x, data=da){{ :pessoais:walmes:cabeca3.gif| }} |
curve(10*x/(3+x), add=TRUE){{ :pessoais:walmes:cabeca4.gif| }} |
|
limits <- list(A=c(0Disciplinas já ofertadas e em andamento. Clique na turma para ir para a página da disciplina onde estão disponíveis o histórico das aulas, 20)provas, B=c(0gabaritos, 6), n=c(0,2))listas de exercícios e notas. |
|
plotMM <^ Disciplina ^ Curso ^ Turma ^ Ano ^ Semestre ^ |
| Estatística Básica (CE-function003 - Estatística II) | Administração | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce00320102n2|N2}} | 2010 | 2º | |
| | Estatística Básica (CE-003 - Estatística II) | Administração | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce00320102n3|N3}} | 2010 | 2º | |
| | Estatística Básica (CE-003 - Estatística II) | Engenharia Cívil | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce003b-2011-01|B}} | 2011 | 1º | |
plot| Estatística Computacional (y~x, data=daCE-223) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce223-2011-01|Única}} | 2011 | 1º | |
curve| Estatística Básica (svalueCE-002 - Estatística I) | Agronomia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce002b-2011-02|B}} | 2011 | 2º | |
| | Estatística Computacional I (CE-083) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2011-02|A e B}} | 2011 | 2º | |
| Estatística Básica (CE-002 - Estatística I) *x^svalue| Agronomia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce002b-2012-01|B}} | 2012 | 1º | |
| Estatística Computacional I (nCE-083) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2012-01|EST}} | 2012 | 1º | |
| Controle de Processos Industriais (svalueCE-074) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce074-2012-02|EST}} | 2012 | 2º | |
| Estatística Computacional I (BCE-083) +x| Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2012-02|EST}} | 2012 | 2º | |
| Estatística Computacional I (CE-083) , add=TRUE| Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2013-01|EST}} | 2013 | 1º | |
| | Estatística Básica (CE-002 - Estatística I) | Agronomia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce002a-2013-01|A}} | 2013 | 1º | |
legend| Bioestatística ("topleft", pasteCE-001 - Bioestatística) | Biologia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce001mb-2013-01|MB}} | 2013 | 1º | |
| Estatística Computacional I (withCE-083) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2013-02|EST}} | 2013 | 2º | |
| Estatística Computacional II (da, sumCE-089) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce089-2013-02|EST}} | 2013 | 2º| |
| | Análise de regressão linear (CE-071) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce071-2014-01|EST}} | 2014 | 1º | |
| Estatística Computacional I (yCE-svalue083) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2014-01|EST}} | 2014 | 1º | |
| Bioestatística (ACE-001 - Bioestatística) *x| Biologia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce001mb-2014-01|MB}} | 2014 | 1º | |
| Estatística Computacional I (svalueCE-083) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce083-2014-02|EST}} | 2014 | 2º | |
| Estatística Computacional II (BCE-089) +x| Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce089-2014-02|EST}} | 2014 | 2º | |
| | Planejamento de Experimentos I (CE-213) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce213-2015-01|EST}} | 2015 | 1º | |
| Planejamento e análise de experimentos irregulares (CE-063) ^2| Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce063-2015-01|EST}} | 2015 | 1º | |
| | Bioestatística (CE-001 - Bioestatística) | Biologia | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce001mb-2015-01|MB}} | 2015 | 1º | |
| Estatística computational II (CE-089 - Estatística) ), bty="n")| Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce089-2015-02|EST}} | 2015 | 2º | |
| | Ferramentas para relatórios dinâmicos (CE-064 - Estatística) | Estatística | {{http://www.leg.ufpr.br/doku.php/disciplinas:ce064-2015-02|EST}} | 2015 | 2º | |
| ---- |
|
#func1 <- function(limits){ |
w <- gwindow("Slider and spinbox example") |
tbl =glayout(cont=w) |
for(i in 1:length(limits)){ |
tbl[i,1] <- paste("Slide to adjuste parameter", names(limits)[i]) |
tbl[i,2, expand=TRUE] <- (assign(names(limits)[i], |
gslider(from= limits[[i]][1], |
toCursos de R =limits[[i]][2], |
by=diff(limits[[i]])/20, |
value=mean(limits[[i]]), |
container=tbl, handler=plotMM))) |
} |
#} |
#func1(limits) |
plotMM() |
|
#==========================================================================================^ Tema ^ Público ^ Lugar ^ Período ^ |
<| {{http:/code>/www.leg.ufpr.br/doku.php/pessoais:walmes:cursoragrarias|Modelagem e análise de dados experimentais com o programa computacional R}} | Pós Graduação em Produção Vegetal - UFPR | UFPR, Curitba-PR | 7 à 11 de Fevereiro de 2011 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorufgd|Curso de capacitação ao ambiente estatístico R}} | Docentes da Faculdade de Ciências Agrárias da Universidade Federal da Grande Dourados | UFGD, Dourados-MS | 25 à 29 de abril de 2011 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorcnpaf|Estatística Experimental Aplicada}} | Pesquisadores da Embrapa Arroz e Feijão e acadêmicos da UFG | CNPAF, Santo Antônio de Goiás-GO | 07 à 11 de novembro de 2011 | |
| | {{http://www.leg.ufpr.br/doku.php/cursos:mcie|Métodos computacionais para inferência com aplicações em R}} | Participantes do 57º RBRAS | 57º RBRAS, Piracicaba-SP | 05 à 09 de Maio de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorseagro|Estatística Experimental Aplicada}} | Pesquisadores da Epagri-SC e Engenheiros Agronômos | IF de Videira, Videira-SC | 18 e 19 de maio de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorunochapeco|Análise Estatística em Ambiente R}} | Curso de Especialização em Instrumentação Estatística da UNOCHAPECÓ | UNOCHAPECÓ, Chapecó - SC | 01-02/06 e 15-16/06 de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorcpao|Curso em análise de experimentos com afastamento das pressuposições}} | Pesquisadores da Embrapa Agropecuária Oeste | CPAO, Dourados-MS | 25 à 29 de junho de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/cursos:cnj|Capacitação em R}} | Conselho Nacional de Justiça | Brasília-DF | 20-12/06 e 04-05/10 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursoragrarias2012|Modelagem e análise de dados experimentais com o programa computacional R}} |Pós Graduação em Produção Vegetal - UFPR | UFPR, Curitba-PR | 3º trimestre letivo de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursorcnpaf2|Aplicação de modelos mistos por meio da ferramenta R}} | Pesquisadores da Embrapa Arroz e Feijão e acadêmicos da UFG | CNPAF, Santo Antônio de Goiás-GO | 12 à 14 de novembro de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cursoruesc|Modelos de regressão não linear}} | Docentes do DCET da UESC | UESC, Ilhéus-BA | 22 à 23 de novembro de 2012 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:mrnl2013|Curso em modelos de regressão não linear}} | Participantes do 15º SINAPE | 15º SINAPE, Campina Grande-PB | 22 à 26 de Julho de 2013 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:conest2013|Curso em modelos de regressão não linear}} | Participantes do 2º CONEST | 2º CONEST, Curitiba-PR | 07 à 09 de Novembro de 2013 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:ciaeear| Modelagem estatística com aplicações na análise de experimentos}} | Participantes do CIAEEAR | CIAEEAR, Manaus-AM | 12 e 13 de Agosto de 2014 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:geneticaesalq| Ajuste de modelos lineares e mistos no ambiente R }} | Acadêmicos do programa de Pós Graduação em Genética e Melhoramento de Plantas | ESALQ/USP, Piracicaba-SP | 09 a 10 de Outubro de 2014 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cpaa| Curso de estatística experimental com aplicações em R }} | Pesquisadores da Embrapa Amazônia Ocidental | CPAA, Manaus-AM | 12 a 14 de Novembro de 2014 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:cnpaf3| Aplicação de modelos de regressão linear e não linear em ciências agrárias}} | Pesquisadores da Embrapa Arroz e Feijão e acadêmicos da UFG | CNPAF, Santo Antônio de Goiás-GO | 09 a 11 de Dezembro de 2014 | |
| | {{http://www.leg.ufpr.br/doku.php/pessoais:walmes:fiocruz| Modelos de Regressão e aplicações no ambiente R}} | Analistas da Fundação Oswaldo Cruz | FIOCRUZ, Manaus-AM | 13 a 17 de Abril de 2015 | |
|
/* |
<code R> |
#==========================================================================================---- |
|
scriptName <- "filename.R" |
author <- "Walmes" |
footnote <- paste(scriptName, format(Sys.time(), "%d %b %Y"), |
author, sep=" / ")=== Blog ==== |
|
makeFootnote <- function(footnoteText= |
format(Sys[[http://ridiculas.time(), "%d %b %Y"), |
size= wordpress.7, color= grey(.5))com/|{ |
require(grid) |
pushViewport(viewport()) |
grid{:pessoais:walmes:ridiculas.text(label= footnoteText , |
x = unit(1,"npc") - unit(2, "mm"), |
y= unit(2, "mm"), |
just=c("right", "bottom"), |
gp=gpar(cex= size, col=color)) |
popViewport() |
| png |}}]] Blog que administro e mantenho com a colaboração de amigos também apaixonados pelo R. Clique na figura ao lado para ir para o blog. |
|
require(lattice) |
xyplot(rnorm(30)~rnorm(30)) |
makeFootnote(footnote)---- |
|
#======================================================================================== Consultor == |
|
require * {{http://publicacoes.unifal-mg.edu.br/revistas/index.php/sigmae/issue/current|Revista Sigmae (latticeeditor)}} |
require * {{http://www.scielo.br/scielo.php/script_sci_serial/pid_0100-2945/lng_pt/nrm_iso|Revista Brasileira de Fruticultura (gridrevisor)}}; |
require * {{http://www.ajaes.ufra.edu.br/index.php/ajaes|Revista de Ciências Agrárias}} / Amazonian Journal of Agricultural and Environmental Sciences (latticeExtrarevisor); |
| * {{http://periodicos.ufersa.edu.br/revistas/index.php/sistema/index|Revista Caatinga (revisor)}}; |
|
x <- rnorm(100) |
z <- rep(1:2, 50) |
|
ecdfplot(~x|z, |
panel=function(x, subscripts, ...){ |
panel.ecdfplot(x, subscripts= subscripts, ...) |
ou <- capture.output(summary(x)) |
for(i in length(ou):1){ |
grid.text(labelArtigos publicados em periódicos =ou[i], x=0.5, y=unit(1+i, "lines"), |
gp=gpar(col=1, fontfamily="mono")) |
} |
pushViewport(viewport(0.02, 0.5, 0.48, 0.48, just=c("left","bottom"))) |
print(histogram(x[subscripts], xlab=NULL, ylab=NULL, scales=list(draw=FALSE)), newpage=FALSE) |
popViewport() |
pushViewport(viewport(0.5, 0.02, 0.48, 0.48, just=c("left","bottom"))) |
print(densityplot(x[subscripts], xlab="Olá", ylab="Olá", scales=list(draw=TRUE), col="red"), newpage=FALSE) |
popViewport() |
}) |
|
#========================================================================================== |
</code> |
| * Consulte {{http://www.mendeley.com/profiles/walmes-zeviani1/|meu perfil acadêmico no Mendeley}}. Todas as publicações concluídas possuem cópia digital disponível para download. |
|
===== Ensino ===== |
{{:pessoais:walmes:cabeca.gif|}} |
{{:pessoais:walmes:cabeca2.gif|}} |
{{:pessoais:walmes:cabeca3.gif|}} |
{{:pessoais:walmes:cabeca4.gif|}}---- |
|
* Página da disciplina para as turmas [[http:==== Participação em Projetos//www.leg.ufpr.br/doku.php/disciplinas:ce00320102n2 | N2]] e [[http://www.leg.ufpr.br/doku.php/disciplinas:ce00320102n3 | N3]]; |
* Histórico das aulas para as tumas [[http://www.leg.ufpr.br/doku.php/disciplinas:ce00320102n2:historico20102 | N2]] e [[http://www.leg.ufpr.br/doku.php/disciplinas:ce00320102n3:historico20102 | N3]] |
* [[http://www.leg.ufpr.br/~walmes/ensino/prova-1.pdf | Download]] da primeira avaliação Grupos de Estatística Básica com gabarito. |
* [[http://www.leg.ufpr.br/~walmes/ensino/notas-1.pdf | Download]] das notas e faltas referentes ao período até a primeira avaliação. |
* [[http://www.leg.ufpr.br/~walmes/ensino/lista-2.pdf | Download]] da lista com exercícios referentes ao conteúdo da segunda avaliação. |
* [[http://www.leg.ufpr.br/~walmes/ensino/gab.pdf | Download]] dos resultados dos exercícios referentes ao conteúdo da segunda avaliação. |
* [[http://www.leg.ufpr.br/~walmes/ensino/notas-2.pdf | Download]] das notas e faltas referentes ao período até a segunda avaliação. |
* [[http://www.leg.ufpr.br/~walmes/ensino/lista-3.pdf | Download]] da lista com exercícios referentes ao conteúdo da terceira avaliação. |
* [[http://www.leg.ufpr.br/lib/exe/fetch.php?mediaPesquisa ====http%3A%2F%2Fwww.leg.ufpr.br%2F~paulojus%2Frestrito%2Fdicas%2FtabelasEST.pdf |
| Download]] das tabelas estatísticas (da normal, da t e outras). |
* [[http://www.leg.ufpr.br/~walmes/ensino/notas-3.pdf | Download]] das notas da terceira avaliação. |
* [[http://www.leg.ufpr.br/~walmes/ensino/notas-f.pdf | Download]] das notas do exame com as médias finais. Alunos que querem revisão de prova devem me procurar até as 19 horas de 20/12/2010. |
|
| * Projeto com Larissa (http://lattes.cnpq.br/5306520242222948); |
| * Projeto com Maristella (http://lattes.cnpq.br/7578795880165011); |
| * Projeto com Eduardo (http://lattes.cnpq.br/0288146552740769); |
| * Projeto com Rafael (http://lattes.cnpq.br/3314759970388496); |
| * Projeto com Rodrigo (http://lattes.cnpq.br/3314759970388496); |
| * Grupo com PJ; |
|
| ---- |
|
/* {{url>http://maps.google.com/maps?q=-25.450419,-49.231754&num=1&t=h&sll=-25.428356,-49.273252&sspn=Playground 0.207122,0.487175&ie=UTF8∓ll=-25.450635,-49.231831&spn=0.001618,0.004828&z=14&output=embed" 60%, 400px right}} */ |
|
<code R> |
#==== ====================================================================================== |
# Estimação de parâmetros de modelos não lineares. Ajuste de modelos para a construção de |
# intervalo hídrico ótimo |
#========================================================================================== |
|
#------------------------------------------------------------------------------------------ |
# pacotes necessários |
|
install.packages("plyr", dep=TRUE, repos="http://cran-r.c3sl.ufpr.br/") |
library(plyr) |
|
#------------------------------------------------------------------------------------------ |
# entrada de dados |
|
iho <- read.table("http://www.leg.ufpr.br/~walmes/docs/iho-data.txt", header=TRUE, sep="\t") |
iho <- read.table("iho-data.txt", header=TRUE, sep="\t") |
iho <- iho[,-c(1:4)] |
names(iho) <- tolower(names(iho)) |
str(iho) |
|
#------------------------------------------------------------------------------------------ |
# tratamento dos dados: usar valor médio das repetições para ajuste da curva |
|
iho <- ddply(iho, .(tensao), "mean") |
str(iho) |
|
#------------------------------------------------------------------------------------------ |
# ajuste da curva característica segundo modelo theta = a*Psi^b*Ds^c |
|
cra <- nls(theta~A*tensao^B*ds^C, data=iho, |
start=list(A=1, B=1, C=1)) |
summary(cra) |
|
#------------------------------------------------------------------------------------------ |
# ajuste do modelo nulo (sem efeito de Ds Localização e tensão) |
|
nulo.cra <- nls(theta~mu, dataacesso ao LEG =iho, start=list(mu=1)) |
|
#------------------------------------------------------------------------------------------ |
# testa a significância do modelo cra |
|
an.cra <- anova(nulo.cra, cra) |
an.cra |
|
#------------------------------------------------------------------------------------------ |
# R^2 do modelo cra |
|
R2.cra <- 1-deviance(cra)/deviance(nulo.cra) |
R2.cra |
|
#------------------------------------------------------------------------------------------ |
# verifica o ajuste observado vs predito (7 pontos apenas não dá pra fazer julgamento) |
|
plot(iho$theta~fitted(cra)) |
|
#------------------------------------------------------------------------------------------ |
# ajuste do modelo de resistência a penetração |
|
rp <- nls(rp~D*theta^E*ds^F, data=iho, |
start=list(D=1, E=1, F=1)) |
summary(rp) |
|
#------------------------------------------------------------------------------------------ |
# ajuste do modelo nulo (sem efeito de theta e Ds) |
|
nulo.rp <- nls(rp~mu, data=iho, start=list(mu=1)) |
|
#------------------------------------------------------------------------------------------ |
# testa a significância do modelo rp |
|
an.rp <- anova(nulo.rp, rp) |
an.rp |
|
#------------------------------------------------------------------------------------------ |
# R^2 do modelo rp |
|
R2.rp <- 1-deviance(rp)/deviance(nulo.rp) |
R2.rp |
|
#------------------------------------------------------------------------------------------ |
# verifica o ajuste observado vs predito (7 pontos apenas não dá pra fazer julgamento) |
|
plot(iho$rp~fitted(rp)) |
|
#------------------------------------------------------------------------------------------ |
# tabela com as estimativas dos parâmetros e intervalos de confiânça |
|
summary(cra)$coeff |
summary(rp)$coeff |
confint.default(cra) |
confint.default(rp) |
|
#------------------------------------------------------------------------------------------ |
# juntar tudo numa tabela |
|
cbind(rbind(summary(cra)$coeff, summary(rp)$coeff), |
rbind(confint.default(cra), confint.default(rp))) |
|
#------------------------------------------------------------------------------------------ |
# valor de F e R^2 retirar dos resultados de anova() e R^2 |
|
data.frame(Fval=c(an.cra$F[2], an.rp$F[2]), |
pval=c(an.cra$Pr[2], an.rp$Pr[2]), |
R2=c(R2.cra, R2.rp)) |
|
#------------------------------------------------------------------------------------------ |
</code> |
|
| {{url>https://www.google.com/maps/embed?pb=!1m18!1m12!1m3!1d564.2522116460914!2d-49.23199628189322!3d-25.450604466085466!2m3!1f0!2f0!3f0!3m2!1i1024!2i768!4f13.1!3m3!1m2!1s0x94dce510e9d02257%3A0x516ed7ceab34accb!2sLEG+UFPR!5e1!3m2!1sen!2sus!4v1470836620774}} |
|
| O LEG fica no 2º andar do prédio das Ciências Exatas, porta 232. |
|
| \\ |
|
===== Conteúdo aleatório =====/* {{http://www.leg.ufpr.br/~walmes/ensino/legmapa.png?800|}} */ |
| /* {{http://www.leg.ufpr.br/~walmes/ensino/leg-mapa.png?800|}} */ |
| {{http://www.leg.ufpr.br/~walmes/ensino/leg_mapa.jpg?800|}} |
|
<html><object width="636" height="516"><param name="movie" |
value="http://www.youtube.com/v/tDAB6BIz5nQ?version=3"></param><param name="allowFullScreen" value="true"></param><param |
name="allowscriptaccess" value="always"></param><embed src="http://www.youtube.com/v/tDAB6BIz5nQ?version=3" |
type="application/x-shockwave-flash" allowscriptaccess="always" allowfullscreen="true" width="636" |
height="516"></embed></object></html>-- |
|
<latex> |
\displaystyle \frac{x^2}{\log{2}} |
</latex>==== Dicas de Linux ==== |
|
Uma variação * Estilo de citação ABNT para Mendeley; |
| * Como fazer: http://vps.fmvz.usp.br/blogs/fernando/2011/05/12/estilo-abnt-para-mendeley/ |
| * Estilos ABNT disponíveis: http://wisleyvelasco.com.br/2013/05/16/estilos-mendeley/ |
* Download do problema dos aniversários **LaTable** para confecção de tabelas para Latex ([[http://pballewwww.blogspotleg.ufpr.br/~walmes/docs/LaTable.exe]]). A versão disponível para Download tem compatibilidade com o wine e portanto pode ser usada por usuários Linux ([[http:/2011/01www.guiadohardware.net/gettingtutoriais/usando-fullwine/|usando o wine]]). Nos casos em as tabelas estão prontas em editores de texto (e.g. OpenOffice-setWriter) ou em planilhas eletrônicas (e.htmlg. OpenOffice-Calc) pode-se colar o conteúdo da tabela em um arquivo de extensão *.txt e importar pelo LaTable. No LaTable é possível fazer a formatação de alinhamento de colunas e inserção linhas verticais e horizontais, usadas, em geral, para separar o cabeçalho da tabela do restante. Depois da edição é só copiar, em formato Latex, o conteúdo da tabela para área de transferência e colar no seu editor. |
| * Site para criar [[http://www.freepasswordgenerator.com/|senhas aleatórias]], com diversas opções como tamanho e tipos de caracteres e criação de senhas pronunciáveis. |
| ---- |
|
==== = Curso R - Engenharia Química e Tikz lista de Alimentos =links ==== |
|
Lista com links sobre tikz |
* Apostila do Curso [[{{http://www.leghackenberger.ufprat/blog/ktikz-editor-for-the-tikz-language/}}; |
* {{http://www.brtikzedt.org/~walmes}}; |
* {{http://ctan.mackichan.com/graphics/pgf/contrib/cursoRtikz-3dplot/cursoR2tikz-3dplot_documentation.pdf|(download)]]}}; |
* Dados usados durante Curso em planilha eletrônica ({{http://www.tcs.uni-luebeck.de/downloads/papers/2011/2011-configurable-graph-drawing-algorithms-jannis-pohlmann.pdf}}; |
* {{http://old.xls) [[nabble.com/PGF-and-TikZ-f3582.html}}; |
| * {{http://stackoverflow.com/tags/tikz/hot}}; |
* {{http://www.leglatex-community.ufprorg/know-how/427-stemma-tikz}}; |
| * {{http://tex.blogoverflow.com/category/latex/}}; |
| * {{http://tex.stackexchange.com/questions/49974/problem-in-tikz-figure}}; |
| * {{http://pdp7.org/blog/?p=133}}; |
| * {{http://tex.stackexchange.com/questions/39296/simulating-hand-drawn-lines}}; |
| * {{http://tex.stackexchange.com/questions/48606/merge-arrows-with-tikz}}; |
| * {{http://latexbr.blogspot.com.br/2011/01/desenhando-com-tikz.html}}; |
* {{http://www.math.uni-leipzig.de/~walmeshellmund/cursoRLaTeX/dadospgf-tut.xls|(download)]]pdf}}; |
* Dados usados durante Curso em arquivos {{http://tpx.sourceforge.net/}}; |
| * {{http://www.tug.org/pracjourn/2007-1/mertz/mertz.pdf}}; |
| * {{http://www.texample.net/tikz/resources/}}; |
* {{http://www.statistiker-wg.detexto (/pgf/tutorials.htm}}; |
* {{http://www.txt) compactados (jmilne.org/not/Mtikz.pdf}}; |
* {{http://www.zip) [[podcast.tv/video-episodes/a-tikz-tutorial-generating-graphics-in-the-spirit-of-tex-11056310.html}}; |
* {{http://www.legyoutube.ufprcom/watch?v=7KO-X03lW6Q}}; |
| * {{http://cahiers.gutenberg.eu.org/cg-bin/article/CG_2007___48_23_0.pdf}}; |
| * {{http://www.youtube.com/watch?v=MCpRtorWFZs}}; |
* {{http://latexbr.blogspot.com.br/~walmes2011/cursoR07/dadostxtposicionando-figuras-com-tikz.zip|(download)]]html}}; |
* Questionário do curso [[ https{{http://spreadsheetswww.googlegetreuer.info/tutorials/tikz}}; |
| * {{http://skipperkongen.dk/2012/01/18/3d-graphics-in-latex-with-tikz/}}; |
* {{http://latexbr.blogspot.com.br/embeddedform2011/01/desenhando-em-tikz-com-ktikz.html}} |
| * {{http://river-valley.tv/graphics-with-pgf-and-tikz/}}; |
| * {{http://www.wekaleamstudios.co.uk/posts/tikz-nodes/}}; |
| * {{http://latexbr.blogspot.com.br/2011/01/mais-manuais-tikz.html}}; |
| * {{http://www.megacz.com/thoughts/tikz.pgf.html}}; |
| * {{http://en.eannu.com/tikz_tutorial.html}}; |
| * {{http://texblog.net/latex/graphics/pgf-tikz/}}; |
| * {{http://mgeisler.net/2006/06/pgf-and-tikz-wow/}}; |
* {{http://www.youtube.com/watch?formkeyv=dHhrZkFnQWFvVHJJRFpmd3paeklTZnc6MQ | (responder)]]MmkEw9BUhUs}}; |
| * {{http://tex.stackexchange.com/questions/24001/how-to-draw-two-tkiz-pictures-are-parallel-to-each-other}}; |
| * {{http://www.r-bloggers.com/tag/tikz/}}; |
| * {{http://www.koreanpopnews.com/pdf/pdf/pgf-tikz---graphics-for-latex---a-tutorial.html}}; |
| * {{http://www.tagmantic.com/search/youtube/examples-tikz-tutorial}}; |
|
| ---- |
