Plot.MFA {MVar.pt}

Graficos da analise de multiplos fatores (MFA).

Description

Graficos da analise de multiplos fatores (MFA).

Usage

Plot.MFA(MFA, titles = NA, xlabel = NA, ylabel = NA,
         posleg = 2, boxleg = TRUE, size = 1.1, grid = TRUE, 
         color = TRUE, groupscolor = NA, namarr = FALSE, 
         linlab = NA, savptc = FALSE, width = 3236, 
         height = 2000, res = 300, casc = TRUE)

Arguments

MFA

Dados da funcao MFA.

titles

Titulos para os graficos, se nao for definido assume texto padrao.

xlabel

Nomeia o eixo X, se nao for definido assume texto padrao.

ylabel

Nomeia o eixo Y, se nao for definido assume texto padrao.

posleg

1 para legenda no canto superior esquerdo,
2 para legenda no canto superior direito (default),
3 para legenda no canto inferior direito,
4 para legenda no canto inferior esquerdo.

boxleg

Coloca moldura na legenda (default = TRUE).

size

Tamanho dos pontos no grafico.

grid

Coloca grade nos graficos (default = TRUE).

color

Graficos coloridos (default = TRUE).

groupscolor

Vetor com as cores dos grupos.

namarr

Coloca nomes nos pontos na nuvem ao redor do centroide no grafico correspondente a analise global dos individuos e variaveis (default = FALSE).

linlab

Vetor com os rotulos para as observacoes, se nao for definido assume texto padrao.

savptc

Salva as imagens dos graficos em arquivos (default = FALSE).

width

Largura do grafico quanto savptc = TRUE (defaul = 3236).

height

Altura do grafico quanto savptc = TRUE (default = 2000).

res

Resolucao nominal em ppi do grafico quanto savptc = TRUE (default = 300).

casc

Efeito cascata na apresentacao dos graficos (default = TRUE).

Value

Retorna varios graficos.

Author(s)

Paulo Cesar Ossani

Marcelo Angelo Cirillo

See Also

MFA

Examples

data(DataMix) # conjunto de dados mistos

data <- DataMix[,2:ncol(DataMix)] 

rownames(data) <- DataMix[1:nrow(DataMix),1]

group.names = c("Notas Cafes/Trabalho", "Formacao/Dedicacao", "Cafes")
           
mf <- MFA(data, c(2,2,2), typegroups = c("n","c","f"), group.names) # realiza MFA

tit <- c("Scree-plot","Observacoes","Observacoes/Variaveis",
        "Circulo de Correlacoes","Inercias dos Grupos Variaveis")

Plot.MFA(MFA = mf, titles = tit, xlabel = NA, ylabel = NA,
         posleg = 2, boxleg = FALSE, color = TRUE, 
         groupscolor = c("blue3","red","goldenrod3"), 
         namarr = FALSE, linlab = NA, savptc = FALSE,
         width = 3236, height = 2000, res = 300, 
         casc = FALSE) # Plota varios graficos da tela

Plot.MFA(MFA = mf, titles = tit, xlabel = NA, ylabel = NA,
         posleg = 2, boxleg = FALSE, color = TRUE, 
         namarr = FALSE, linlab = rep("A?",10), 
         savptc = FALSE, width = 3236, height = 2000, 
         res = 300, casc = FALSE) # Plota varios graficos da tela