[ROWS] 24
[FIELDS] 18
[MODIFIED] 2025-01-30
[DOWNLOAD] https://download.cms.gov/openpayments/SMRY_RPTS_P01302025_01212025/PBLCTN_NTNL_SMRY_P01302025_01212025-joined.csv
22 Summary National
National Level Payment Total and Averages for all Years
Metadata
Data
fmt_covered <- function(x, what) {
what <- match.arg(
what,
c(
"Covered Recipient Physician",
"Covered Recipient Non-Physician Practitioner"
)
)
sbt(x, recipient_type == what) |>
fcompute(
year = factor_(program_year),
payment_type = factor_(payment_type),
recipient_type = what,
recipient_n = as.integer(total_number_of_physicians),
payment_sum = as.numeric(total_payment_amount_physician),
payment_mean = as.numeric(mean_total_payment_amount_physician),
payment_median = as.numeric(median_total_payment_amount_physician),
payments_n = as.integer(total_payment_count_physician),
payments_mean = as.double(mean_total_payment_count_physician),
payments_median = as.double(median_total_payment_count_physician)
)
}
resp <- quick("summary_national", limit = 500)
resp <- funique(resp$recipient_type) |>
map(\(type) fmt_covered(x = resp, what = type)) |>
rowbind() |>
mtt(recipient_type = factor_(recipient_type)) |>
roworder(recipient_type, payment_type) |>
print(n = Inf)
# A tibble: 24 × 10
year payment_type recipient_type recipient_n payment_sum payment_mean
1 2021 General Covered Recipient No… 0 0 0
2 2022 General Covered Recipient No… 0 0 0
3 2023 General Covered Recipient No… 0 0 0
4 ALL General Covered Recipient No… 0 0 0
5 2021 Research Covered Recipient No… 0 0 0
6 2022 Research Covered Recipient No… 0 0 0
7 2023 Research Covered Recipient No… 0 0 0
8 ALL Research Covered Recipient No… 0 0 0
9 2017 General Covered Recipient Ph… 635227 2.19e 9 3453.
10 2018 General Covered Recipient Ph… 631460 2.27e 9 3593.
11 2019 General Covered Recipient Ph… 624949 2.43e 9 3890.
12 2020 General Covered Recipient Ph… 489144 1.69e 9 3445.
13 2021 General Covered Recipient Ph… 534963 2.16e 9 4031.
14 2022 General Covered Recipient Ph… 592270 2.54e 9 4287.
15 2023 General Covered Recipient Ph… 628916 2.28e 9 3617.
16 ALL General Covered Recipient Ph… 1117674 1.55e10 13912.
17 2017 Research Covered Recipient Ph… 7326 1.12e 8 15230.
18 2018 Research Covered Recipient Ph… 6845 1.09e 8 15875.
19 2019 Research Covered Recipient Ph… 7333 9.99e 7 13619.
20 2020 Research Covered Recipient Ph… 6880 8.15e 7 11849.
21 2021 Research Covered Recipient Ph… 5285 8.02e 7 15169.
22 2022 Research Covered Recipient Ph… 5269 7.80e 7 14807.
23 2023 Research Covered Recipient Ph… 5430 7.11e 7 13093.
24 ALL Research Covered Recipient Ph… 23251 6.31e 8 27135.
# ℹ 4 more variables: payment_median , payments_n ,
# payments_mean , payments_median
describe_distribution(resp, by = "recipient_type")
recipient_type | Variable | Mean
-------------------------------------------------------------------------
Covered Recipient Non-Physician Practitioner | recipient_n | 0.00
Covered Recipient Non-Physician Practitioner | payment_sum | 0.00
Covered Recipient Non-Physician Practitioner | payment_mean | 0.00
Covered Recipient Non-Physician Practitioner | payment_median | 0.00
Covered Recipient Non-Physician Practitioner | payments_n | 0.00
Covered Recipient Non-Physician Practitioner | payments_mean | 0.00
Covered Recipient Non-Physician Practitioner | payments_median | 0.00
Covered Recipient Physician | recipient_n | 3.33e+05
Covered Recipient Physician | payment_sum | 2.02e+09
Covered Recipient Physician | payment_mean | 10437.86
Covered Recipient Physician | payment_median | 1209.95
Covered Recipient Physician | payments_n | 8.17e+06
Covered Recipient Physician | payments_mean | 13.06
Covered Recipient Physician | payments_median | 3.25
recipient_type | SD | IQR
------------------------------------------------------------------
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Non-Physician Practitioner | 0.00 | 0.00
Covered Recipient Physician | 3.60e+05 | 6.21e+05
Covered Recipient Physician | 3.76e+09 | 2.19e+09
Covered Recipient Physician | 6912.92 | 11392.83
Covered Recipient Physician | 1100.25 | 1968.39
Covered Recipient Physician | 1.59e+07 | 1.03e+07
Covered Recipient Physician | 13.15 | 11.50
Covered Recipient Physician | 1.77 | 2.00
recipient_type | Range | Skewness
------------------------------------------------------------------------------
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Non-Physician Practitioner | [0.00, 0.00] |
Covered Recipient Physician | [5269.00, 1.12e+06] | 0.56
Covered Recipient Physician | [7.11e+07, 1.55e+10] | 3.48
Covered Recipient Physician | [3445.15, 27134.73] | 0.72
Covered Recipient Physician | [114.71, 2800.00] | 0.22
Covered Recipient Physician | [22271.00, 6.51e+07] | 3.41
Covered Recipient Physician | [4.00, 58.00] | 2.91
Covered Recipient Physician | [2.00, 9.00] | 2.45
recipient_type | Kurtosis | n | n_Missing
------------------------------------------------------------------------
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Non-Physician Practitioner | | 8 | 0
Covered Recipient Physician | -0.70 | 16 | 0
Covered Recipient Physician | 13.08 | 16 | 0
Covered Recipient Physician | 0.41 | 16 | 0
Covered Recipient Physician | -1.88 | 16 | 0
Covered Recipient Physician | 12.66 | 16 | 0
Covered Recipient Physician | 9.99 | 16 | 0
Covered Recipient Physician | 7.57 | 16 | 0
report::report_sample(resp, by = "recipient_type", n = TRUE)
# Descriptive Statistics
Variable
-----------------------------
year [2017], %, n
year [2018], %, n
year [2019], %, n
year [2020], %, n
year [2021], %, n
year [2022], %, n
year [2023], %, n
year [ALL], %, n
payment_type [Research], %, n
Mean recipient_n (SD), n
Mean payment_sum (SD), n
Mean payment_mean (SD), n
Mean payment_median (SD), n
Mean payments_n (SD), n
Mean payments_mean (SD), n
Mean payments_median (SD), n
Covered Recipient Non-Physician Practitioner (n=8)
--------------------------------------------------
0.0, 0
0.0, 0
0.0, 0
0.0, 0
25.0, 2
25.0, 2
25.0, 2
25.0, 2
50.0, 4
0.00 (0.00), 8
0.00 (0.00), 8
0.00 (0.00), 8
0.00 (0.00), 8
0.00 (0.00), 8
0.00 (0.00), 8
0.00 (0.00), 8
Covered Recipient Physician (n=16) | Total (n=24)
----------------------------------------------------------------------
12.5, 2 | 8.3, 2
12.5, 2 | 8.3, 2
12.5, 2 | 8.3, 2
12.5, 2 | 8.3, 2
12.5, 2 | 16.7, 4
12.5, 2 | 16.7, 4
12.5, 2 | 16.7, 4
12.5, 2 | 16.7, 4
50.0, 8 | 50.0, 12
332638.88 (360021.05), 16 | 221759.25 (331947.70), 24
2022519511.80 (3757382288.64), 16 | 1348346341.20 (3186829412.60), 24
10437.86 (6912.92), 16 | 6958.57 (7511.98), 24
1209.95 (1100.25), 16 | 806.64 (1062.53), 24
8167242.00 (15921584.00), 16 | 5444828.00 (13445876.01), 24
13.06 (13.15), 16 | 8.71 (12.34), 24
3.25 (1.77), 16 | 2.17 (2.12), 24