Optimizar codigo power query promedio movil

Hola lbendlin actualmente son 105 grupos x 31 = 3.255 iteracciones, use Table.Buffer pero se sigue demorando te comparto el code. sabes que otra solución podria tomar?

GroupedTable = Table.Group(
    #"Filtered rows <> estacionalidad",
    {"Pk_EmpresaCuentaTercero"},
    {
        {"Data", each
            let
                // Aplicar Table.Buffer para evitar lecturas repetidas
                BufferedTable = Table.Buffer(_),

                // Filtrar solo las filas "Real"
                a = Table.SelectRows(BufferedTable, each [Mark_Real_Proyeccion] = "Real"),
                
                // Obtener el valor máximo de "Index"
                b = List.Max(a[Index]),
                
                // Obtener el número de meses de la primera fila
                Numero_de_Meses = a{0}[Numero de Meses],
                
                // Obtener los últimos "Numero_de_Meses" valores de "Importe"
                c = List.LastN(a[Importe], Numero_de_Meses),
                
                // Contar el número de filas en el grupo
                d = Table.RowCount(BufferedTable),

                // Crear un buffer de la columna "Importe" para evitar cálculos repetidos
                ImporteList = List.Buffer(BufferedTable[Importe]),
                
                // Generar la lista de promedios rodantes
                RollingAverages = List.Generate(
                    () => [x = 0, y = c],
                    each [x] < d,
                    each [y = List.Combine({[y], {List.Average(List.LastN([y], Numero_de_Meses))}}), x = [x] + 1],
                    each List.Average(List.LastN([y], Numero_de_Meses))
                ),
                
                // Agregar la columna de promedio rodante
                UpdatedData = Table.AddColumn(
                    BufferedTable,
                    "RollingAverage",
                    each 
                        let
                            idx = [Index] - b - 1
                        in
                            if idx >= 0 then 
                                RollingAverages{idx}
                            else 
                                [Importe] // Si el índice es negativo, asignar null
                )
            in
                UpdatedData
        }
    }
)

Muchas gracias por tu ayuda lbendlin