Error in geom_subview

[canfeng-HUA]

I meet an error when I try to plot a bubble plot following the tutorial (https://guangchuangyu.github.io/cn/2017/07/pie-version-of-bubble-plot/).

when I use the following code, an error occurred.
p <- ggplot(crime, aes(murder, Robbery)) + geom_subview(leg1, x=10, y=50) + geom_subview(crime$pie, crime$murder, crime$Robbery, width=crime$width, height=crime$height) + geom_text_repel(aes(label=state))

Error in geom_subview(leg1, x = 10, y = 50) :
x aesthetic mapping should be provided

Could you please help me to solve it.