Better Handling of Formatting Anonymous Functions that are Piped to?

Hello,

I was wondering if there air could better format the following piece of code?

correction_factor <- fitted.values(mod) |>
          {\(y_hat) (exp(y_hat) - 1)}() |>
          {\(y_hat_back_transformed) {
              lm(df$deaths ~ y_hat_back_transformed - 1)
            }}() |>
          {\(fitted_model) coef(fitted_model)}() |>
          {\(named_coef) unname(named_coef)}()

I'm running air 0.7.0 and it formats it this way, which I think is arguably harder to read because there's so much clutter separating the informative pieces of information

correction_factor <- fitted.values(mod) |>
  {
    \(y_hat) (exp(y_hat) - 1)
  }() |>
  {
    \(y_hat_back_transformed) {
      lm(df$deaths ~ y_hat_back_transformed - 1)
    }
  }() |>
  {
    \(fitted_model) coef(fitted_model)
  }() |>
  {
    \(named_coef) unname(named_coef)
  }()

Start with the R snippet in the issue and reproduce the current formatter output using air 0.7.0 or the repository's formatter entry point. Compare the requested pipe formatting with the existing output and define the desired result so the anonymous functions no longer add unnecessary visual clutter. Done means the formatter produces the improved layout consistently.