{"cells":[{"metadata":{"_cell_guid":"b899c13c-5985-4f44-9853-7496c2b66757","_uuid":"6e475f2defdec41ece1ddae53f5da949a3138a93"},"cell_type":"markdown","source":"**Draw a random sample (e.g. 10mn rows) from training set and make it available for download (in .RData - format)**"},{"metadata":{"_cell_guid":"0e902c02-2b4b-467d-8df7-ae8aa942b3f2","_execution_state":"idle","_uuid":"4d341a72de32ff9207fe483952ef25c5ab26613a","trusted":false},"cell_type":"code","source":"rm(list=ls())\nlibrary(data.table)\nlibrary(dplyr)\n# use fread, because read.csv would use up to much RAM\ndf <- fread(\"../input/train.csv\", sep=\",\")","execution_count":null,"outputs":[]},{"metadata":{"_cell_guid":"4501a2c3-1cf7-48fd-ab61-1617c6878d36","_uuid":"7f73c0aa1a80a6edc6edd81c14fc942ccaabbde3","trusted":false},"cell_type":"code","source":"str(df)","execution_count":null,"outputs":[]},{"metadata":{"_cell_guid":"53d0179a-6e44-49d2-83e3-6e55b32d5529","_uuid":"beb6001c2715d48fcf52a71c2c4c092ac022129c","trusted":false},"cell_type":"code","source":"# reduce to sample subset\nset.seed(20)\ndf <- dplyr::sample_n(df, 10000000)","execution_count":null,"outputs":[]},{"metadata":{"_cell_guid":"80c8972d-825d-47a8-a455-d9594a941b9f","_uuid":"d740aeea28384ad6130cb71feeafb7c1e78dde64","trusted":false},"cell_type":"code","source":"# save to file\nsave(df, file='sample.RData')","execution_count":null,"outputs":[]}],"metadata":{"language_info":{"mimetype":"text/x-r-source","name":"R","pygments_lexer":"r","version":"3.4.2","file_extension":".r","codemirror_mode":"r"},"kernelspec":{"display_name":"R","language":"R","name":"ir"}},"nbformat":4,"nbformat_minor":1}