my experments with R