Opt out data
###################################
##### By registered geography #####
###################################
NDOP_reg_geo <- fread(paste0(rawdatadir,"/August 2021/NDOP_reg_geo_Aug_2021.csv"),
header=TRUE, sep=",", check.names=T) %>%
mutate(.,pcode=str_replace(POSTCODE," ",""),
OPT_OUT_NUM=as.numeric(paste(OPT_OUT)),
LIST_SIZE_NUM=as.numeric(paste(LIST_SIZE)))
#################################
##### By resident geography #####
#################################
NDOP_res_geo <- fread(paste0(rawdatadir,"/August 2021/NDOP_res_geo_Aug_2021.csv"),
header=TRUE, sep=",", check.names=T) %>%
mutate(.,OPT_OUT_NUM=as.numeric(paste(OPT_OUT)))
#############################
##### By age and gender #####
#############################
NDOP_age_gender <- fread(paste0(rawdatadir,"/August 2021/NDOP_age_gen_Aug_2021.csv"),
header=TRUE, sep=",", check.names=T) %>%
mutate(.,OPT_OUT_NUM=as.numeric(paste(OPT_OUT)))
##########################
##### Dashboard data #####
##########################
NDOP_dashboard <- fread(paste0(rawdatadir,"/Dashboard data/NDOP.csv"),
header=TRUE, sep=",", check.names=T)
Upper tier LA (2021) level map of opt out rate
- Uses modelled estimate of list size at the upper-tier LA level in Aug 2021
- The same map at the CCG level is possible using denominator provided by NHS Digital, but this background tile not available at CCG level
#TO BE REDONE USING NEW DENOM
img2_path <- paste0(rawdatadir,"Maps/UTLA August 2021 map.PNG")
include_graphics(img2_path)

Opt outs by age and gender
- Denominator is list size provided by NHS-Digital
National trend in opt out rate
Denominator is list size as provided by NHS Digital
National trend in opt out rate + selected CCGs (highest rate and highest change in rate in previous year)
- For national and CCG trends, denominator is list size as provided by NHS Digital
Top 5 CCGs with highest rate in August 2021
- For national and CCG trends, denominator is list size as provided by NHS Digital
#Candidates for chart
candidates_c <- delta_1yr_summary %>%
filter(.,CCG_NAME!="Unallocated") %>%
slice_max(.,opt_out_rate.now,n=5) %>%
pull(CCG_NAME)
#Table
delta_1yr_summary %>%
filter(.,CCG_NAME %in% candidates_c) %>%
arrange(.,-opt_out_rate.now) %>%
kable(.,digits=1,format.args = list(big.mark = ",")) %>%
kableExtra::kable_styling(.,bootstrap_options = c("striped", "hover"),full_width = F, font_size= 10)
|
CCG_CODE
|
CCG_NAME
|
opt_out_rate.lastyear
|
opt_out_rate.now
|
OPT_OUT_NUM.lastyear
|
OPT_OUT_NUM.now
|
delta_rate_1yr
|
|
00Y
|
NHS Oldham CCG
|
NA
|
11.6
|
NA
|
30,324
|
NA
|
|
00R
|
NHS Blackpool CCG
|
NA
|
10.3
|
NA
|
18,067
|
NA
|
|
01Y
|
NHS Tameside and Glossop CCG
|
14.4
|
10.3
|
4,765
|
25,959
|
4.2
|
|
12F
|
NHS Wirral CCG
|
NA
|
8.8
|
NA
|
29,949
|
NA
|
|
93C
|
NHS North Central London CCG
|
4.6
|
7.9
|
71,083
|
134,856
|
3.3
|
Top 5 CCGs with highest yearly change in rate in August 2021
- For national and CCG trends, denominator is list size as provided by NHS Digital
#Candidates for chart
candidates_d <- delta_1yr_summary %>%
filter(.,!(CCG_NAME %in% c("Unallocated","NHS Tameside and Glossop CCG"))) %>%
slice_max(.,delta_rate_1yr,n=5) %>%
pull(CCG_NAME)
#Table
delta_1yr_summary %>%
filter(.,CCG_NAME %in% candidates_d) %>%
arrange(.,-delta_rate_1yr) %>%
kable(.,digits=1,format.args = list(big.mark = ",")) %>%
kableExtra::kable_styling(.,bootstrap_options = c("striped", "hover"),full_width = F, font_size= 10)
|
CCG_CODE
|
CCG_NAME
|
opt_out_rate.lastyear
|
opt_out_rate.now
|
OPT_OUT_NUM.lastyear
|
OPT_OUT_NUM.now
|
delta_rate_1yr
|
|
15E
|
NHS Birmingham and Solihull CCG
|
1.3
|
5.7
|
51
|
76,266
|
4.3
|
|
72Q
|
NHS South East London CCG
|
3.6
|
7.6
|
69,861
|
155,501
|
4.0
|
|
36L
|
NHS South West London CCG
|
3.2
|
6.6
|
51,717
|
114,213
|
3.4
|
|
93C
|
NHS North Central London CCG
|
4.6
|
7.9
|
71,083
|
134,856
|
3.3
|
|
09D
|
NHS Brighton and Hove CCG
|
2.6
|
5.8
|
8,049
|
18,974
|
3.2
|
GP surgeries with high rates of opting out (>50%)
- Denominator is list size as provided by NHS Digital
Excluding GP surgeries with fewer than 1,000 patients (arbitrary cut-off). See list of 20 below.
GP_stats <- NDOP_reg_geo %>%
filter(.,ACH_DATE==latest_month) %>%
mutate(.,OPT_OUT_NUM=as.numeric(paste(OPT_OUT)),
LIST_SIZE_NUM=as.numeric(paste(LIST_SIZE))) %>%
filter(.,(!is.na(OPT_OUT_NUM))&(!is.na(LIST_SIZE_NUM))) %>%
mutate(.,GP_opt_out_rate=OPT_OUT_NUM/LIST_SIZE_NUM*100) %>%
mutate(.,GP_opt_out_rate=ifelse(GP_opt_out_rate>100,100,GP_opt_out_rate))
GP_stats %>%
filter(.,GP_opt_out_rate>50,LIST_SIZE_NUM>1000) %>%
select(.,ACH_DATE,PRACTICE_NAME,CCG_NAME,STP_NAME,OPT_OUT_NUM,LIST_SIZE_NUM,GP_opt_out_rate) %>%
arrange(.,-GP_opt_out_rate) %>%
kable(.,digits=1,format.args = list(big.mark = ",")) %>%
kableExtra::kable_styling(.,bootstrap_options = c("striped", "hover"),full_width = F, font_size= 10)
|
ACH_DATE
|
PRACTICE_NAME
|
CCG_NAME
|
STP_NAME
|
OPT_OUT_NUM
|
LIST_SIZE_NUM
|
GP_opt_out_rate
|
|
01/08/2021
|
LIVERPOOL HOUSE SURGERY
|
NHS Morecambe Bay CCG
|
Healthier Lancashire and South Cumbria
|
4,546
|
5,213
|
87.2
|
|
01/08/2021
|
HOWARD STREET MEDICAL PRACTICE
|
NHS Tameside and Glossop CCG
|
Greater Manchester Health and Social Care Partnership
|
2,917
|
3,398
|
85.8
|
|
01/08/2021
|
NORTH SHORE SURGERY
|
NHS Blackpool CCG
|
Healthier Lancashire and South Cumbria
|
11,614
|
13,621
|
85.3
|
|
01/08/2021
|
MORETON CROSS GROUP PRACTICE
|
NHS Wirral CCG
|
Cheshire and Merseyside
|
6,056
|
7,157
|
84.6
|
|
01/08/2021
|
FAILSWORTH GROUP PRACTICE
|
NHS Oldham CCG
|
Greater Manchester Health and Social Care Partnership
|
10,496
|
12,442
|
84.4
|
|
01/08/2021
|
PARKSIDE MEDICAL CENTRE
|
NHS Bedfordshire, Luton and Milton Keynes CCG
|
Bedfordshire, Luton and Milton Keynes
|
8,969
|
10,729
|
83.6
|
|
01/08/2021
|
DR DEGUN & DR MACAULAY
|
NHS Basildon and Brentwood CCG
|
Mid and South Essex
|
5,991
|
7,438
|
80.5
|
|
01/08/2021
|
LAPWORTH SURGERY
|
NHS Coventry and Warwickshire CCG
|
Coventry and Warwickshire
|
2,253
|
2,821
|
79.9
|
|
01/08/2021
|
ABBEY MEDICAL CENTRE
|
NHS Coventry and Warwickshire CCG
|
Coventry and Warwickshire
|
11,516
|
14,769
|
78.0
|
|
01/08/2021
|
THE SINGH MEDICAL PRACTICE
|
NHS Manchester CCG
|
Greater Manchester Health and Social Care Partnership
|
2,922
|
3,899
|
74.9
|
|
01/08/2021
|
QUEENS WALK PRACTICE
|
NHS North West London CCG
|
North West London Health and Care Partnership
|
7,173
|
9,749
|
73.6
|
|
01/08/2021
|
CONSULTING ROOMS
|
NHS Herts Valley CCG
|
Hertfordshire and West Essex
|
4,780
|
6,644
|
71.9
|
|
01/08/2021
|
THE PARK MEDICAL CENTRE
|
NHS Birmingham and Solihull CCG
|
Birmingham and Solihull
|
5,781
|
8,193
|
70.6
|
|
01/08/2021
|
THE STROUDLEY WLK HTH CTR
|
NHS North East London CCG
|
East London Health and Care Partnership
|
2,822
|
4,142
|
68.1
|
|
01/08/2021
|
LITTLETOWN FAMILY MED PRACT
|
NHS Oldham CCG
|
Greater Manchester Health and Social Care Partnership
|
2,984
|
4,681
|
63.7
|
|
01/08/2021
|
AYLESFORD MEDICAL CENTRE
|
NHS Kent and Medway CCG
|
Kent and Medway
|
4,339
|
6,831
|
63.5
|
|
01/08/2021
|
FAMILY PRACTICE
|
NHS Heywood, Middleton and Rochdale CCG
|
Greater Manchester Health and Social Care Partnership
|
3,065
|
4,914
|
62.4
|
|
01/08/2021
|
THE OLD DISPENSARY
|
NHS Dorset CCG
|
Dorset
|
2,187
|
3,656
|
59.8
|
|
01/08/2021
|
CITY ROAD MEDICAL CENTRE
|
NHS Black Country and West Birmingham CCG
|
The Black Country and West Birmingham
|
1,503
|
2,660
|
56.5
|
|
01/08/2021
|
PARKVIEW SURGERY
|
NHS South East London CCG
|
Our Healthier South East London
|
3,502
|
6,395
|
54.8
|
Differences in current opt out rate by deprivation level
- The denominator is a modelled estimate based on list size in Aug 2021