Tabela de conteúdos

SYNCSA-R

Esta página é uma área restrita destinada ao desenvolvimento do projeto SYNCSA-R. Sinta-se à vontade para editá-la sempre que for preciso. Abaixo criamos uma área pessoal para cada membro ter mais liberdade para postar arquivos, idéias, artigos etc. O Wiki é bem fácil de usar, mas qualquer problema é só entrar em contato.

News

Lista de funções

  1. Entrada de dados
    1. B
    2. W
    3. E
    4. F
  2. Transformações
    1. T
    2. Q
    3. P
    4. U
    5. X
  3. Correlações
    1. TE
    2. XE.T
    3. BF
    4. PE
    5. PT
    6. PX.T
    7. TE.P
    8. XE.TP
  4. Maximizações
    1. Tipos
    2. Correlações
  5. Testes de significância
  6. Índices de diversidade (?)

Cronograma

Um bom começo é traçar um plano de ação e, para tanto, seria interessante se dividíssemos o longo caminho em passos ou tarefas a serem feitas por cada um. Abaixo um exemplo de como poderia ser nosso cronograma:

20102011
Membronovembrodezembrojaneirofevereiromarçoabrilmaio
Alexandrerevisar as funçoes de matrizesxxxxxx
Marcelrodar no R as funções do syncsaxxxxxx
Valérioxxxxxxx
VanderleiTerminar os comandos que geram as matrizes - Organizar o texto com entrada e saída de dados para cada funçãoxxxxxx

Funções

matrix.p

Função criada pelo Vanderlei para produzir as matrizes W Q P

Modificada por:

Alexandre Adalardo 2010/10/27 13:22:

Instructions for data input

Input data could be of classes matrix or data frame

Function output

Object class “syncsa”, a list with:

* matrix.P = Phylogeny-weighted species composition matrix. Row totals (communities) = 1.

Function Code

matrix.p<-function(comm,dist.filo)
	{
	namespp.comm=colnames(comm)
	namespp.dist=colnames(dist.filo)
	match.names= match(namespp.comm, namespp.dist)
		if(sum(is.na(match.names))>0)
		{
		stop("\n There are species from community data that are not on phylogenetic distance matrix\n")
		}
	dist.spp=dist.filo[match.names,match.names]
	row.sum<-rowSums(comm)
	matrix.w=as.matrix(comm/row.sum) 
	sim.spp=1-(dist.spp/max(dist.spp)[1]) 
	matrix.q.ale=as.matrix(sim.spp/colSums(sim.spp))
	matrix.P<-matrix.w%*%matrix.q
	resulta=(list(matrix.w=matrix.w,matrix.q=matrix.q,matrix.P=matrix.P))
	attributes(resulta)$class="syncsa"
	#attributes(resulta)$comm=comm
	#attributes(resulta)$dist.spp=dist.spp
	return(resulta)
	}

Arquivos

Já existe outra versão, tanto da p.matrix quanto das outras matrizes e correlações. Não trabalhem nesse, caso precisem entrem em contato, estou trabalhando nelas. — Alexandre Adalardo 2010/11/05 10:05

Áreas pessoais

Aqui você pode ficar ainda mais à vontade e postar scripts em fase de construção, arquivos que não julga ser do interesse de todos e coisas do gênero. É só criar um linque e você terá uma página só para você.

alexandre_syncsa

marcel_syncsa

valerio_syncsa

vanderlei_syncsa

Referências