
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

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@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@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

Você pode modificar através do argumento theme() mais detalhes em http://docs.ggplot2.org/current/theme.html Em Seg, 2015-02-23 às 17:55 -0300, Fernando Gama escreveu:
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@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@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 _______________________________________________ R-br mailing list R-br@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.
-- Izidro F. Sousa-Filho Lab Radioisótopos EPF, Instituto de Biofísica CCF Centro de Ciências da Saúde - CCS Av. Carlos Chagas Filho, 373 Universidade Federal do Rio de Janeiro CEP: 21941-902 Rio de Janeiro - BRASIL Tel:+55 21 39386649 Cel: +55 21 974938012 CV Lattes: http://lattes.cnpq.br/2284704200023497 Use R! Use Linux! Use Software free!

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@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@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.

Ok vou tentar. [ ]'s.Edson Lira Estatístico Manaus-Amazonas Em Segunda-feira, 23 de Fevereiro de 2015 17:07, Tropidurus Torquatus <t.torquatus@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@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@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.
participantes (4)
-
Edson Lira
-
Fernando Gama
-
izi
-
Tropidurus Torquatus