Problem in downloading microdata from brazilian censo

[ulissescsf]

I am using the code in http://asdfree.com/ to download the brazilian microdata from censo, but when i am compiling the code below appear a message of Error:

examine all available CENSO microdata files

censo_cat <- get_catalog( "censo" , output_dir = file.path( path.expand( "~" ) , "CENSO" ) )

The message occurs afeter it

2000 only

censo_cat <- subset( censo_cat , year == 2000 )

lodown is now exiting unexpectedly. websites that host publicly-downloadable microdata change often and sometimes those changes cause this software to break. if the error call stack below appears to be a hiccup in your internet connection, then please verify your connectivity and retry the download. otherwise, please open a new issue at https://github.com/ajdamico/asdfree/issues with the contents of this error call stack and also the output of your sessionInfo().

How can i do about it?