解决R语言深度学习下载数据kaggle_original_data的系列难点

《R语言深度学习》第103页下载kaggle_original_data数据遇到一系列难点。以下，逐个叙述解决难点的方法：

1）下载kaggle_original_data数据

下载时遇到kaggle时遇到不能注册的问题，网上介绍从Google或Edge翻墙的方法现在都过时了，注册Gmail账号要上Google网站当然也不行。但是，可以从微软官网下载Download Kaggle Cats and Dogs Dataset from Official Microsoft Download Center

 2解决kaggle数据的问题

务必删除数据中两个损坏的文件并用数据集末尾的文件改名替换：  cat/666.jpg 、dog/11702.jpg。否则，程序运行中就会因文件损坏而中断。

3解决微软数据变动的问题

由于微软Kaggle Cats and Dogs Dataset对原文件夹名和文件名作了改动，因而对程序也要作相应改动。

将

original_dataset_dir <- "~/Downloads/kaggle_original_data"

改为

original_dataset_dir_cat <- "C:/Users/Administrator/Downloads/PetImages/cat"
original_dataset_dir_dog <- "C:/Users/Administrator/Downloads/PetImages/dog"。

以下，凡涉及original_dataset_dir时，按语句读取cat或dog文件，在其后加后缀_cat或_dog。

将

base_dir <- "~/Downloads/cats_and_dogs_small"改为"~\Downloads\PetImages"

将

fnames <- paste0("cat.", 1:1000, ".jpg")

改为fnames <- paste0("",1:1000, ".jpg")。否则，R找不到对应的.jpg文件。以下，paste0语句也要作类似修改。

运行程序得到圆满结果：