R 自然区间生成（一维聚类），对每个区间的观测范围进行约束

我有一个实数向量，我想在上面创建自然间隔。换句话说，我想执行一维聚类。约束条件是，在每个区间中，最高值和最低值之间的差值必须小于常数c，比如3。我想得到一个区间数最少的解

我试着用高斯核的密度估计来确定时间间隔，并减少binwidth，直到每个范围小于3。但是，它不起作用，因为即使我将binwidth减小了很多，某些间隔范围仍然大于3。此外，算法开始创建不包含数据的间隔

库（tidyverse）
库（数据表）
#创建实数向量-------------------------------------------------------------------------------------------------
种子集（2019年）
铌
对数据进行排序
求最小值m
把[m:m+3]里的所有东西都放到一个箱子里
对其余数据重复
这个相当简单的方法似乎满足了您给出的约束：宽度最多为3，没有空的间隔。尽可能快