R analysis + local experiment