Create Cards_Classes_example.R