R language Input / Output card done