Create R analisys