some demos while learning R