curly				package:unknown			R documentation

Teste de comparação de curvas de dois conjuntos de dados.


Description

Faz a comparação estatística entre as proporções ou porcentagens de dois conjuntos de dados ao longo de um determinado período de tempo 
e produz um gráfico de dispersão dos dados e suas curvas ajustadas.


Usage:

curly(dados, choosepoints=FALSE, xtype="name", ytype="name", ...)


Arguments:

dados - data frame com uma coluna categórica com 1 fator de vários níveis e duas colunas numéricas. 
A primeira coluna numérica deve conter a variável independente 
e a segunda coluna numérica deve ser a variável dependente (em proporção ou porcentagem).

choosepoints - se TRUE, devem ser escolhidos dois pontos para uma comparação num determinado intervalo delimitado no eixo X. 
Caso seja FALSE, a comparação será feita em toda a extensão do conjunto de dados.  Default=FALSE. 

xtype - colocar o nome do xlab nos dois gráficos plotados

ytype - colocar o nome do ylab nos dois gráficos plotados

... - argumentos da função plot, por favor veja função plot() e par(). Alguns argumentos que podem ser usados:

	pch - muda o tipo dos pontos do gráfico de dispersão
	col - muda as cores a serem colocadas no plot
	cex - aumenta do tamanho do texto do plot e dos símbolos
	main - muda o título do gráfico


Details:

A função é apenas aplicada para dados que sejam medidos em proporção ou porcentagem. 
O objetivo da função é verificar se duas curvas são iguais em função de uma variável independente (como tempo, peso, etc).
Esta variável independente deve ter o mesmo intervalo nos dois conjuntos de dados.
Se o argumento choosepoints for TRUE, a função irá produzir as linhas secantes da taxa de variação média.
A função permite a entrada de um um fator com vários niveís no entanto apenas os primeiros dois níveis serão usados para a função.


Value:

Terá uma lista como saída com os seguintes componentes:

Se, choosepoints=FALSE

	Tabela com as variáveis do primeiro conjunto de dados
	Tabela com as variáveis do segundo conjunto de dados
	Parâmetros do Teste Qui-quadrado e valor de p associado

Se, choosepoints=TRUE

	Tabela com as variáveis do primeiro conjunto de dados (mostrando apenas as que estão no intervalo escolhido pelo utilizador)
	Tabela com as variáveis do segundo conjunto de dados (mostrando apenas as que estão no intervalo escolhido pelo utilizador)
	Valor da taxa de variação média da primeira curva (entre os pontos escolhidos pelo utilizador)
	Valor da taxa de variação média da segunda curva (entre os pontos escolhidos pelo utilizador)
	Parâmetros do Teste Qui-quadrado e valor d p associado

Warning:

Aceita apenas data frame com uma coluna categórica com 1 fator de vários níveis e duas colunas numéricas.
Se forem colocados mais de 2 níveis no factor a função irá apenas fazer a comparação entre os dois primeiros níveis do data frame.

Author:

Filipa Alexandra de Abreu Paulos

Examples:

#Exemplo

x <- rep(c("Adequatefood","Inadequatefood"), each=15)
y <- rep.int(c(1:15), times=2)
z1 <- c(0.06666667, 0.33333333, 0.86666667, 0.60000000, 0.60000000, 0.66666667, 0.73333333, 0.80000000, 0.86666667, 0.80000000, 1.00000000, 1.00000000, 1.00000000, 0.66666667, 1.00000000)
z2 <- c(0.00000000, 0.66666667, 0.53333333, 0.53333333, 0.93333333, 0.80000000, 0.73333333, 0.93333333, 0.80000000, 0.93333333, 0.93333333, 0.93333333, 0.86666667, 0.86666667, 0.86666667)
z <- c(z1,z2)
dados <- data.frame(x,y,z)

curly(dados)
curly(dados, xtype="Proporção de escolhas correctas", ytype="Sessão", pch=c(1,3))
curly(dados, choosepoints=TRUE, cex=2)

##Exemplo com distribuições exponenciais

x <- rep(c("f","h"), each=60)
y <- rep.int(c(1:60), times=2)
zi <- pexp(1:500, 0.01)
z1 <- sort(sample(zi,60))
z2 <- sort(sample(zi,60))
z <- c(z1,z2)
da <- data.frame(x,y,z)

curly(da)
curly(da, choosepoints=TRUE)
curly(da, choosepoints=F, cex.lab=2, col="red")