can you tell me what is wrong in this function. it is not working

Helper function to check if symbol is in imported graphics

isInImportsGraphics $<-$ function$($sym$)\{$

imports$\_$env $<-$ asNamespace$(\text{'}$graphics$\text{'})$

exists$($sym$,$ envir $=$ imports$\_$env, inherits $=$ FALSE$)$

$\}$

$($im using the above function to use in following if statement$)$

if $($isInImportsGraphics$($sym$))\{$

return$("$imports:graphics"$)$

$\}$