added R kernel smooth & fix gaussian kernel