时间戳

首页 > 解决方案 > R中整数的非递增分区

r - R中整数的非递增分区

问题描述

如何在给定整数 n 的 r 中编写函数计算 n 的所有非递增分区。

Example:

For n=3,

1 1 1

2 1

3

 

For n=4,

1 1 1 1

2 2

2 1 1

3 1

4

标签： r

解决方案

解决了这个问题。只是发布我的答案。

#install.packages("partitions")
library(partitions)

partition <- function(n){
  x<- t(parts(n))
  
  x[nrow(x):1,]
  
  
}
partition(3)
partition(4)

推荐阅读