Displaying 4 results from an estimated 4 matches for "numdi".
Did you mean:
numdf
2007 Jul 16
0
FW: summary statistics for groups
...th" function to get means.
Give this a try:
# setup some fake data as an example
icd9 <- c(rep("dis1",4), rep("dis2",5), rep("dis3",3))
n <- length(icd9)
exposure <- rnorm(n)
working <- data.frame(icd9, exposure)
# get some useful things together
numDis <- length(levels(working$icd9))
diseaseCodes <- levels(working$icd9)
# capture results in here
results <- data.frame(ICD9code=diseaseCodes, ave_exposure=rep(NA,
numDis), ICD9count=rep(NA, numDis), other_ave=rep(NA, numDis),
other_Ct=rep(NA, numDis))
for(k in 1:numDis){
working$indi...
2015 Jul 13
2
Crear datos aleatorios con restriciones
..., e3...
> numEs <- 20
> escuelas <- paste("e", 1:numEs, sep="")
>
> #Generar "g" Grados: g1, g2, g3...
> numGr <- 3
> grados <- paste("g", 1:numGr, sep="")
>
> #Generar "c" Divisiones: c1, c2, c3...
> numDi <- 4
> divis <- paste("c", 1:numDi, sep="")
>
>
> #Agrupo Escuelas - Grados
> EsGra <- outer(escuelas, grados, FUN="paste")
>
> #Agrupo (Escuelas - Grados) - Divisiones
> EsGraDiv <- outer(EsGra, divis, FUN="paste")
>
&g...
2015 Jul 13
2
Crear datos aleatorios con restriciones
..., nombre del maestro, otras caracteristics del maestro.
Muchas gracias por la ayuda.
On Mon, Jul 13, 2015 at 6:37 PM Carlos Ortega <cof en qualityexcellence.es>
wrote:
> Hola,
>
> No entiendo muy bien.
> El número de clases lo puedes modificar a tu gusto, en la variable "numDi".
>
> He puesto un valor de ejemplo de 4 porque así aparecía en tu código,
> obviamente puedes poner otro valor...
> La única limitación aparecerá cuando escojas un valor muy grande y el
> cálculo de las combinaciones posibles tarde en generarse. He probadoc con
> 20 y sigue...
2015 Jul 13
2
Crear datos aleatorios con restriciones
Hola,
0. La falta de 'elegancia' hace que sea mas dificil hacer cambios al
codigo. Por ejemplo cambiar n.classrooms <- 4 a n.classrooms <- 20
1. Cuando tengo solo 4 puedo hacer esto:
schoolGrade$A <- Teachers$Teacher.ID[1:cuttoff1]
schoolGrade$B <- Teachers$Teacher.ID[1:cuttoff1]
schoolGrade$C <- Teachers$Teacher.ID[(cuttoff1+1):n.teachers]
schoolGrade$D <-