similar to: Texto en el eje de ordenadas de un gráfico

Mando este mensaje de respuesta para dar las gracias tanto a Pedro como a Carlos por sus sugerencias. Ahora ya tengo los números que quiero en la gráfica, me falta por quitar los que no quiero. Teniendo en cuenta lo que dice Pedro, voy a preguntar al autor de la librería. saludos, Fernando En martes, 9 de octubre de 2018 13:23:51 CEST, Carlos Ortega <cof en qualityexcellence.es>

Hola a todos, Os envío una consulta que considero sencilla pero me está resultando imposible de resolver. Si ejecutáis el siguiente código, obtendréis la gráfica que os adjunto: library(ltm) modelo <- rasch(LSAT) plot(modelo, main="Curva probabilidad pregunta 1",legend = TRUE, cx = "bottomright", items=1,xlab="Conocimiento",ylab="Probabilidad") Resulta

Hello All, I was wondering how I can get the overall Pearson chi^2 test of model fit with its df and p value in the LTM package for the 2PL models. Thanks, -- Davood Tofighi Department of Psychology Arizona State University [[alternative HTML version deleted]]

Dear R-List, to assess the model fit for 2PL-models, I tried to mimic the bootstrap-approach chosen in the GoF.rasch()-function. Not being a statistician, I was wondering whether the following simplification (omit the "chi-squared-expressed model fit-step") would be appropriate: GoF.ltm <- function(object, B = 50, ...){ liFits <- list() for(i in 1:B){ rndDat <-

Dear all, I'm working on ability estimates using Rasch model. Using the "ltm" package, the procedure is quite simple: ## Factor Scores for the Rasch model fit <- rasch(LSAT) factor.scores(fit) What about Partial Credit Model (PCM)? For PCM I use PCM function from eRm package. Is there any similar function like factor.scores to estimate ability scores using PCM model? Best,

Dear Listers: I used cronbach{psy} to evaluate the internal consistency and some set of variables gave me alpha=-1.1003, while other, alpha=-0.2; alpha=0.89; and so on. I am interested in knowing how to interpret 1. negative value 2. negative value less than -1. I also want to re-mention my previous question about how to evaluate the consistency of a set of variables and about the total

Hello, I will use the lca method in the e1071 package. But I get the following error: Error in pas[j, ] <- drop(exp(rep(1, nvar) %*% log(mp))) : number of items to replace is not a multiple of replacement length Does anybody know this error and knows what this means? Kind regards, Tryntsje

Muchas gracias Carlos por los enlaces. Estimado Javier Marcuzzi lo que yo quiero es poner las marcas secundarias a mis ejes sin etiquetas como se puede hacer en matplotlib. Un ejemplo se puede ver en el siguiente enlace https://interactivechaos.com/es/manual/tutorial-de-matplotlib/marcas-principales-y-secundarias El sáb, 10 jun 2023 a las 22:56, Carlos Ortega (<cof en

Estimada Comunidad, solicito vuestra ayuda en un tema quizás un poco tonto, pero no logro dar con la tecla. Estoy intentando hacer una gráfica de la evolución temporal de una variable (xbar) a lo largo del tiempo. La secuencia que he hecho es la siguiente: attach(Libro1) plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,650), type="b", pch=19,cex=1)

Muchas gracias Carlos, previo a mi correo, entre las pruebas que hice estaba una parecida a la que apuntas de la siguiente manera: attach (Libro1) plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,660), xaxt="n", type="b", pch=19,cex=1) xlabels<-strptime(fecha,format="%d/%m/%Y") axis.Date (1,at=xlabels,format="%b-%y")

Hola Carlos, afortunadamente, encontré una solución a mi problema (hasta ahora al menos me funciona, veremos si más adelante se me complica con alguna otra cosa) Llogré resolver el problema usando el parámetro "labels" de la función "axis()". Lo que hice es algo así: *datos <- read.table(....)* #en el archivo datos, tengo una columna con las fechas en formato julian hecha

Muchísimas gracias Carlos, de verdad que te agradezco la ayuda, pero no es lo que voy buscando. Quiero colocar en el eje de abscisas la secuencia temporal de los meses, es decir, agosto septiembre, octubre, etc? pero no las fechas de las toma de datos, sino que aparezca la marca de un mes, y la siguiente marca sea la del siguiente mes, etc?, y además que las muestras estén separadas de acuerdo con

Hola de nuevo, acabo de encontrar la solución. He creado una variable ficticia con los días 1 de cada mes en la secuencia temporal que quería y después he actuado de la siguiente manera attach(Libro1) plot (xbar~as.Date(fecha,"%d/%m/%y"), type="b", pch=19,cex=2,xaxt="n") xlabels<-strptime(ofeje, format = "%d/%m/%y") axis.Date(1,

Muy buenas; mi primera consulta. Utilizo rpart (con as.party) y evtree, para obtener árboles de clasificación. Los represento en una windows() aparte, pero cuando el árbol es un poco grande, las hojas quedan muy estrechas y no se ven los porcentajes. ¿Sabéis como hacer que todo el árbol sea más pequeño para que las hojas no queden como simples líneas? Gracias -- Dr Manuel Mendoza

Javier, no s? si es esto lo que buscas. Te copio una l?nea de uno de mis scripts. En el eje X, van los a?os desde 1990 a 2022, pero solo salen los a?os 90, 95, ... y el resto solo la marca secundaria sin el a?o scale_x_continuous(breaks = seq(1990, 2022, by = 1), labels = c(1990, rep("", 4), 1995, rep("", 4), 2000, rep("", 4),

Hola: Estoy intentando dibujar una espiral a la que le quería colocar unas marcas equidistantes. Estoy utilizando: T = seq(0, 20*pi, length.out=1000) X = T * cos(T) Y = T * sin(T) plot(X, Y) que dibuja puntos siguiendo una espiral. Como podría convertirlo en una espiral continua con marcas equidistantes? He buscado en r-cran, y no he encontrado nada. Muchas gracias y saludos!! Griera

Estimados, tengo una consulta acerca de gráficas con xyplot. Tengo una base de datos con dos perfiles de concentracion por sujeto, ya que a cada sujeto se le administraron dos formulaciones. Con la función xyplot he podido graficar cada perfil separando sujetos y formulaciones: pl <- xyplot (DV~TIME | factor(ID)+factor(FORM), data=tab, type = 'l',

Reunión de usuarios Barcelona --- El próximo 9 de octubre a las 19h retomamos las sesiones del grupo de usuarios de Barcelona, [http://rugbcn.wordpress.com/|RugBcn]. La reunión será en la empresa aceleradora de startups, [http://itnig.net/|itnig] (Calle Álaba 61, 5-2, Barcelona) y para la discusión final, Moritz nos invita a unas cervezas. Las charlas serán: Juan Galeano: ?Visualizando datos:

Buenas, compañeros; Quiero buscar a ver si una idea (ocurrencia?) que tuve tiene sentido, para eso nencesito ver las representaciones gráficas de unos triángulos de los que no sé (ni me importa) la posición, pero sí sé las distancias entre los tres puntos. triangulo.con.lados <- c(47, 45, 55) Encuentro cómo dibujar con la función polygon, pero eso es dada la posición, que no la tengo ni

Afternoon R help, I want to run Rasch/IRT analyses using the ltm package, however, I am using large scale survey data which requires weighting for accurate results. I attempted to create a weighted object to insert into the formulae of the ltm packages, however, the survey data only includes 30 replicate weights and a sampling weight. The svrepdesign requires additional information such as