7
..o tengo que dar¿Hay una función R para obtener el número de permutaciones de n objetos tomando k P (n, k)?
P.nk <- factorial(n)/factorial(n-k)
o
P.nk <- choose(n,k) * factorial(k)
Gracias.
A
Respuesta
8
No conozco ninguna función existente. Su primera sugerencia fallará con n grande. Su segunda idea debería funcionar bien cuando se escribe como una función:
perm <- function(n,k){choose(n,k) * factorial(k)}
Entonces perm(500,2) dará 249500 por ejemplo.
+0
La primera sugerencia podría reescribirse como 'exp (lfactorial (n) - lfactorial (n-k))'. Pero usaré el segundo también. – Marek
3
Creo que el paquete gregmisc proporciona estas funciones.
library(gregmisc)
permutations(n=4,r=4)
Lista de correo de referencia: [R] permutation
+1
En realidad, lo que se pregunta estaría dado por: dim (permutaciones (n, k)) [1] –
1
Salida nsamp(n,k,ordered=T) en el paquete 'prob'
+0
'nsamp (500,2, ordenado = VERDADERO)' encuentra el estado del problema en la respuesta de Rob ('valor fuera de rango ') . – Marek
Cuestiones relacionadas
- 1. Número de dígitos para N ** K
- 2. primeros y últimos k dígitos del número n^n
- 3. Listar todas las combinaciones posibles de k enteros entre 1 ... n (n elegir k)
- 4. R: N primera de todas las permutaciones
- 5. dinámico de programación algoritmo de N, K problema
- 6. Algoritmo para encontrar el punto especial k en el tiempo O (n log n)
- 7. grupo N puntos en k grupos de igual tamaño
- 8. N Elija la función K en R que no funciona: ¿qué me falta?
- 9. No entiendo itoa() en el libro de K & R
- 10. Principiante Haciendo K & R
- 11. ¿Hay una línea nueva = \ n OR \ r \ n?
- 12. K & R: matriz de punteros de caracteres
- 13. Cómo obtener lg2 de un número que es 2^k
- 14. ¿Cuál es el propósito de 'n = n'?
- 15. ¿Cómo pluralizar "Hay/hay N objetos/objetos"?
- 16. Resuelve recurrencia de la forma p [n, m] == p [n, m-2] + p [n-1, m-1] + p [n-2, m]
- 17. A^k para la multiplicación de matrices en R?
- 18. Encuentre el elemento que ocurre b veces en una una matriz de tamaño n * k + b
- 19. Función de instalación de búsqueda de tabla de k & r
- 20. Oracle: una forma elegante de tomar el primer n registro (consulta top-k)
- 21. Función de Ackermann versus n bucles anidados
- 22. Reemplazando "\ r \ n" por "\ n"
- 23. ¿Cómo podemos calcular N elegir K módulo un número primo sin desbordamiento?
- 24. Regex para despojar \ r \ n o \ r \ n
- 25. ¿Qué significa cada [y, n, q, a, d, /, K, j, J, g, e ,?] en el contexto de git -p
- 26. Declaración de función: K & R frente a ANSI
- 27. Número promedio de intervalos de una entrada en 0..N
- 28. Compilación de problemas Ejemplo K & R
- 29. QString :: split() y "\ r", "\ n" y "\ r \ n" convención
- 30. Algoritmo para la k-Fibonacci
Como han dicho otros, hay una función de permutaciones recta en gregmisc (gtools en los nuevos paquetes gregmisc ha analizado) . Pero, esa y todas las demás funciones del paquete que he encontrado son realmente para generar permutaciones, no solo para dar el número total de permutaciones. Por lo tanto, tienden a ser lentos. He comparado previamente tales funciones. Su opción 2 aquí es por lejos la más rápida, mucho más rápida que cualquier otra función de paquete que he encontrado. También tiene un límite superior más alto para los cálculos que su primera opción. – John
Gracias por la información útil – Brani