Esto se ve como un problema donde la interpolación podría ser una herramienta útil. Voy a ilustrar algunas de las distintas propiedades de la partición puede capturar, comenzando con el caso más simple.
Supongamos que todo el intervalo en cuestión es $[a,b]$, el cual está dividido en algún punto de $c$ en el intervalo. Dividimos la subinterval $[a,c]$ a $m$ a partes iguales, y el subinterval $[c,b]$ a $n$ a partes iguales.
Queremos a "suavizar" el intervalo de alguna forma. Bien, podríamos empezar preocupa sólo el número total de subintervalos, $m+n$. Entonces sólo tiene que dividir el intervalo de $[a,b]$ a $m+n$ a partes iguales. Pero eso no es muy satisfactorio.
En su lugar, vamos a tomar en cuenta los tamaños de los originales de las particiones. Al menos podemos mantener el primer y el último particiones del mismo tamaño que cuando fueron podemos cambiar de tamaño. Ahora, ¿no sería agradable si pudiéramos hacer una función que nos daría los extremos de la $n^{\text{th}}$ partición cuando conectamos $n$? Cuáles son las propiedades que queremos que esta función tiene? Así, tendríamos que empezar a $a$, lo $f(0) = a$. Y, como hemos dicho, queremos fijar la longitud de la primera partición, así que queremos que $f(1) = a + (c-a)/m$, que es la longitud de la primera partición. También queremos fijar la longitud de la última partición, así que tenemos que arreglar sus extremos en$b - (b-c)/n$$b$. En resumen, queremos
$f(0) = a,$
$f(1) = a + (c-a)/m,$
$f(m+n-1) = b - (b-c)/n,$
$f(m+n) = b.$
Queremos que el resto de las particiones que acaba de suave a sí mismos entre estos dos, así que vamos a dibujar una simple curva suave a través de estos puntos de datos y hacer con ella. Para ello, nos vamos a encontrar a la interpolación polinómica (el de la interpolación de Lagrange polinomio tiene un particularmente sencillo formulario) para estos puntos. Es fácil en Mathematica:
InterpolatingPolynomial[{{0,a},{1,a+(c-a)/m},{n+m-1,b-(b-c)/n},{n+m,b}},x]
Esto devuelve
$$f(x) = a+x \left(\frac{b-a}{m+n}-\frac{[b m+a n-c (m+n)] [(n-1) (m+n)+(m-n) x] (m+n-x)}{m n (m+n) (m+n-1) (m+n-2)}\right).$$
The results are generally OK. Let's take $a=0$ and $b=100$ as in your example. Now, $c=80$, $m=2$, and $n=10$ is a little extreme, and this polynomial doesn't behave well in that case. Here are some other examples, where the red dots are the original partitioning and the blue dots are the rescaled partitioning.
$c=80$, $m=2$, $n=6$:
$c=50$, $m=2$, $n=9$:
$c=20$, $m=6$, $n=6$:
Generally the results are best the closer the original distribution is to completely uniform.
Now, we may also wish to keep the same number of partitions on either side of $c$. That is, if the original partitioning has $m$ partitions to the left of $c$ and $n$ to the right, we want the rescaled partitioning to do the same. So, on top of conditions (1)-(4) we had earlier, we also want $f(m) = c$, so that the $m^{\text{th}}$ partition ends at $c$. Let's also require that the $m^{\text{th}}$ partition has a length which is the average of the lengths of the first and the last partitions. That is, we want $f(m-1) = c - (n (c - a) + m (b - c))/2 m(n)$. In Mathematica:
InterpolatingPolynomial[{{0,a},{1,a+(c-a)/m},{n+m-1,b-(b-c)/n},{n+m,b},{m,c},{m-1,c-(n (c-a)+m (b-c))/(2 m n)}},x]
The polynomial it gives is pretty ugly, so I'll leave it out. Here are some examples:
$c=80$, $m=4$, $n=5$:
$c=50$, $m=14$, $n=5$:
$c=30$, $m=6$, $n=6$:
Los resultados son un poco raros sometmes pero conservan más de la estructura de la original de particionado que el ejemplo anterior. Así que supongo que depende de lo que usted necesita.