R help - Mar 2010 - likelihood

Hi all,

Does any one know how to write the likelihood function for Poisson distribution
in R when  P(x=0).

 For normal case, it an be written as follows,
....

  n  *  log(lambda)  -  lambda  *  n  *  mean(dat)

....

Any help is highly appreciated

Ashta