# NOT RUN {
data("likingLong")
RR.style("behavior")
RR(liking_a ~ perceiver.id*target.id, data=likingLong)
RR.style("p") # a "p" is enough for "perception"
RR(liking_a ~ perceiver.id*target.id, data=likingLong)
# }
Run the code above in your browser using DataLab