Data Cleaning With R 5/12

Screen Link:

https://app.dataquest.io/m/323/data-cleaning-with-r/5/class-size-data-simplifying-the-dataframe
My Code:

class_size <- class_size %>% filter(GRADE == "09-12", `PROGRAM TYPE` == "GEN ED")

What I expected to happen:
I expected the code to run properly. But it is showing an error

What actually happened:

Error in match.arg(method): object 'PROGRAM TYPE' not found
Traceback:

1. class_size %>% filter(GRADE == "09-12", 
P
R
O
G
R
A
M
T
Y
P
E
 == "GEN ED")
2. filter(., GRADE == "09-12", 
P
R
O
G
R
A
M
T
Y
P
E
 == "GEN ED")
3. match.arg(method)