「データサイエンティストのための最新知識と実践 Rではじめようモダンなデータ分析」のサンプル

「データサイエンティストのための最新知識と実践　Rではじめようモダンなデータ分析」のサンプルが思うように動作しないので、どなたか試してみた方がいらっしゃいましたら教えてください。

実践編2.9（159ページ）の「新米探偵、データ分析に挑む」の”Rと地図と連携する”をやってみた
をやってみたのですが、RStudioに160ページのパッケージを読み込み、161ページのestatapiを読み込み、AppIDを設定するところまではうまくいったのですが、次のところで、

R
1PrefData %>% str()

を入力するとエラーになってしまいます。

R
1> ResultData <- estat_getStatsList(appId = AppID, searchWord = "平成22年国勢調査")
2> PrefData %>% str()
3 eval(lhs, parent, parent) でエラー: 
4   オブジェクト 'PrefData' がありません

書籍の時点と現在では抽出されるデータが変わったのかもしれませんが、何が問題なのかわかりますでしょうか？
書籍とほぼ同じ内容が下記公式サイトに掲載されています。
第8回「新米探偵、データ分析に挑む」の"Rと地図と連携する"をやってみた
出版社のサポートサイトに正誤表は出ていません。
よろしくお願いします。