R как скачать и прочитать xml файл - PullRequest
0 голосов
/ 17 января 2020

Когда я пытаюсь загрузить файл XML с этого сайта с помощью R и открыть после, документ не открывается. Но если я go по этой ссылке использую chrome и загружу вручную, файл работает нормально

url <- "http://fnet.bmfbovespa.com.br/fnet/publico/downloadDocumento?id=71259"
      nome <- paste("C:/Users/Vinicius_KDF/Desktop/Apresentar para a liga - introducao ao R/informes b3/14788492000136-IFP12122019V01-000071259.xml")

download_xml(url, file = nome, quiet = FALSE, mode = "wb",
                   handle = curl::new_handle())

Когда я загружаю с помощью R и открываю с помощью notepad ++, возвращаю это:

"PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxvbmU9InllcyI/Pg0KPERhZG9zRWNvbm9taWNvRmluYW5jZWlyb3MgeG1sbnM6eHNpPSJodHRwOi8vd3d3LnczLm9yZy8yMDAxL1hNTFNjaGVtYS1pbnN0YW5jZSI+DQoJPERhZG9zR2VyYWlzPg0KCQk8Tm9tZUZ1bmRvPkZJSSBQQVRFTyBCQU5ERUlSQU5URVM8L05vbWVGdW5kbz4NCgkJPENOUEpGdW5kbz4xNDc4ODQ5MjAwMDEzNjwvQ05QSkZ1bmRvPg0KCQk8RGF0YUZ1bmNpb25hbWVudG8+MjAxMy0wMS0yMTwvRGF0YUZ1bmNpb25hbWVudG8+DQoJCTxQdWJsaWNvQWx2bz5JbnZlc3RpZG9yZXMgZW0gR2VyYWw8L1B1YmxpY29BbHZvPg0KCQk8Q29kaWdvSVNJTj5CUlBBVEJDVEYwMDQ8L0NvZGlnb0lTSU4+DQoJCTxRdGRDb3Rhc0VtaXRpZGFzPjM0Nzg2NDM8L1F0ZENvdGFzRW1pdGlkYXM+DQoJCTxGdW5kb0V4Y2x1c2l2bz5mYWxzZTwvRnVuZG9FeGNsdXNpdm8+DQoJCTxWaW5jdWxvRmFtaWxpYXJDb3Rpc3Rhcz5mYWxzZTwvVmluY3Vsb0ZhbWlsaWFyQ290aXN0YXM+DQoJCTxBdXRvcnJlZ3VsYWNhbz4NCgkJCTxNYW5kYXRvPlJlbmRhPC9NYW5kYXRvPg0KCQkJPFNlZ21lbnRvQXR1YWNhbz5MYWplcyBDb3Jwb3JhdGl2YXM8L1NlZ21lbnRvQXR1YWNhbz4NCgkJCTxUaXBvR2VzdGFvPlBhc3NpdmE8L1RpcG9HZXN0YW8+DQoJCTwvQXV0b3JyZWd1bGFjYW8+DQoJCTxQcmF6b0R1cmFjYW8+SW5kZXRlcm1pbmFkbzwvUHJhem9EdXJhY2FvPg0KCQk8RGF0YVByYXpvRHVyYWNhbyB4c2k6bmlsPSJ0cnVlIi8+DQoJCTxFbmNlcnJhbWVudG9FeGVyY2ljaW8+MzAvMDY8L0VuY2VycmFtZW50b0V4ZXJjaWNpbz4NCgkJPE1lcmNhZG9OZWdvY2lhY2FvPg0KCQkJPEJvbHNhPmZhbHNlPC9Cb2xzYT4NCgkJCTxNQk8+dHJ1ZTwvTUJPPg0KCQkJPE1CPmZhbHNlPC9NQj4NCgkJPC9NZXJjYWRvTmVnb2NpYWNhbz4NCgkJPEVudGlkYWRlQWRtaW5pc3RyYWRvcmE+DQoJCQk8QlZNRj5mYWxzZTwvQlZNRj4NCgkJCTxDRVRJUD50cnVlPC9DRVRJUD4NCgkJPC9FbnRpZGFkZUFkbWluaXN0cmFkb3JhPg0KCQk8Tm9tZUFkbWluaXN0cmFkb3I+QlRHIFBhY3R1YWwgU2VydmnDp29zIEZpbmFuY2Vpcm9zIFMuQS4g4oCTIERUVk08L05vbWVBZG1pbmlzdHJhZG9yPg0KCQk8Q05QSkFkbWluaXN0cmFkb3I+NTkyODEyNTMwMDAxMjM8L0NOUEpBZG1pbmlzdHJhZG9yPg0KCQk8TG9ncmFkb3Vybz5QcmFpYSBkZSBCb3RhZm9nbzwvTG9ncmFkb3Vybz4NCgkJPE51bWVybz41MDE8L051bWVybz4NCgkJPENvbXBsZW1lbnRvPjbCuiBBbmRhciA8L0NvbXBsZW1lbnRvPg0KCQk8QmFpcnJvPkJvdGFmb2dvPC9CYWlycm8+DQoJCTxDaWRhZGU+UmlvIGRlIEphbmVpcm88L0NpZGFkZT4NCgkJPEVzdGFkbz5SSjwvRXN0YWRvPg0KCQk8Q0VQPjIyLjI1MC0wNDA8L0NFUD4NCgkJPFRlbGVmb25lMT41NSAyMSAzMjYyLTk2MDA8L1RlbGVmb25lMT4NCgkJPFRlbGVmb25lMiB4c2k6bmlsPSJ0cnVlIi8+DQoJCTxUZWxlZm9uZTMgeHNpOm5pbD0idHJ1ZSIvPg0KCQk8U2l0ZT53d3cuYnRncGFjdHVhbC5jb208L1NpdGU+DQoJCTxFbWFpbD5zaC1jb250YXRvLWZ1bmRvaW1vYmlsaWFyaW9AYnRncGFjdHVhbC5jb208L0VtYWlsPg0KCQk8Q29tcGV0ZW5jaWE+MjAxOS0xMS0zMDwvQ29tcGV0ZW5jaWE+DQoJPC9EYWRvc0dlcmFpcz4NCgk8SW5mb3JtZU1lbnNhbD4NCgkJPENvdGlzdGFzIGRhdGFfaW5mb3JtYWNhbz0iMjAxOS0xMS0zMCIgdG90YWw9IjYxIj4NCgkJCTxQZXNzb2FGaXNpY2E+NjA8L1Blc3NvYUZpc2ljYT4NCgkJCTxQSk5hb0ZpbmFuY2VpcmE+MDwvUEpOYW9GaW5hbmNlaXJhPg0KCQkJPEJhbmNvQ29tZXJjaWFsPjA8L0JhbmNvQ29tZXJjaWFsPg0KCQkJPENvcnJldG9yYURpc3RyaWJ1aWRvcmE+MDwvQ29ycmV0b3JhRGlzdHJpYnVpZG9yYT4NCgkJCTxPdXRyYXNQSkZpbmFuY2VpcmFzPjA8L091dHJhc1BKRmluYW5jZWlyYXM+DQoJCQk8SW52ZXN0aWRvcmVzTmFvUmVzaWRlbnRlcz4wPC9JbnZlc3RpZG9yZXNOYW9SZXNpZGVudGVzPg0KCQkJPEVudGlkYWRlQWJlcnRhUHJldkNvbXBsPjA8L0VudGlkYWRlQWJlcnRhUHJldkNvbXBsPg0KCQkJPEVudGlkYWRlRmVjaGFkYVByZXZDb21wbD4wPC9FbnRpZGFkZUZlY2hhZGFQcmV2Q29tcGw+DQoJCQk8UmVnaW1lUHJvcHJpb1ByZXY+MDwvUmVnaW1lUHJvcHJpb1ByZXY+DQoJCQk8U29jaWVkYWRlU2VndXJhZG9yYT4wPC9Tb2NpZWRhZGVTZWd1cmFkb3JhPg0KCQkJPFNvY2llZGFkZUNhcEFycmVuZE1lcmNhbnRpbD4wPC9Tb2NpZWRhZGVDYXBBcnJlbmRNZXJjYW50aWw+DQoJCQk8RnVuZG9zSW52SW1vYmlsaWFyaW8+MDwvRnVuZG9zSW52SW1vYmlsaWFyaW8+DQoJCQk8T3V0cm9zRnVuZG9zSW52PjE8L091dHJvc0Z1bmRvc0ludj4NCgkJCTxDb3Rpc3Rhc0Rpc3RGdW5kbz4wPC9Db3Rpc3Rhc0Rpc3RGdW5kbz4NCgkJCTxPdXRyb3NUaXBvc0NvdGlzdGFzPjA8L091dHJvc1RpcG9zQ290aXN0YXM+DQoJCTwvQ290aXN0YXM+DQoJCTxSZXN1bW8+DQoJCQk8QXRpdm8+NzEyMTMxNzM1LjUzPC9BdGl2bz4NCgkJCTxQYXRyaW1vbmlvTGlxdWlkbz4zODA5NDYwODQuOTwvUGF0cmltb25pb0xpcXVpZG8+DQoJCQk8TnVtQ290YXNFbWl0aWRhcz4zNDc4NjQzPC9OdW1Db3Rhc0VtaXRpZGFzPg0KCQkJPFZhbG9yUGF0ckNvdGFzPjEwOS41MDk5NjgzNjk4NTwvVmFsb3JQYXRyQ290YXM+DQoJCQk8RGVzcGVzYXNUeEFkbWluaXN0cmFjYW8+MC4wMDA0MjM8L0Rlc3Blc2FzVHhBZG1pbmlzdHJhY2FvPg0KCQkJPERlc3Blc2FzQWdDdXN0b2RpYW50ZT4wPC9EZXNwZXNhc0FnQ3VzdG9kaWFudGU+DQoJCQk8UmVudEVmZXRpdmFNZW5zYWwgdG90YWw9IjAuMDA2MDI1Ij4NCgkJCQk8UmVudFBhdHJpbW9uaWFsTWVzPjAuMDAwNDYyPC9SZW50UGF0cmltb25pYWxNZXM+DQoJCQkJPERpdmlkZW5kWWllbGRNZXM+MC4wMDU1NjM8L0RpdmlkZW5kWWllbGRNZXM+DQoJCQk8L1JlbnRFZmV0aXZhTWVuc2FsPg0KCQkJPEFtb3J0aXpBY29lc0NvdGFzPjA8L0Ftb3J0aXpBY29lc0NvdGFzPg0KCQk8L1Jlc3Vtbz4NCgkJPEluZm9ybWFjb2VzQXRpdm8+DQoJCQk8VG90YWxOZWNlc3NpZGFkZXNMaXEgdG90YWw9IjEzMjExNDA0Ljg4Ij4NCgkJCQk8RGlzcG9uaWJpbGlkYWRlcz4yODAuNTwvRGlzcG9uaWJpbGlkYWRlcz4NCgkJCQk8VGl0dWxvc1B1YmxpY29zPjA8L1RpdHVsb3NQdWJsaWNvcz4NCgkJCQk8VGl0dWxvc1ByaXZhZG9zPjA8L1RpdHVsb3NQcml2YWRvcz4NCgkJCQk8RnVuZG9zUmVuZGFGaXhhPjEzMjExMTI0LjM4PC9GdW5kb3NSZW5kYUZpeGE+DQoJCQk8L1RvdGFsTmVjZXNzaWRhZGVzTGlxPg0KCQkJPFRvdGFsSW52ZXN0aWRvIHRvdGFsPSI2OTM5ODQwMzAuNjEiPg0KCQkJCTxEaXJlaXRvc0JlbnNJbW92ZWlzIHRvdGFsPSI2OTM5ODQwMzAuNjEiPg0KCQkJCQk8VGVycmVub3M+MDwvVGVycmVub3M+DQoJCQkJCTxJbW92ZWlzUmVuZGFBY2FiYWRvcz42OTM5ODQwMzAuNjE8L0ltb3ZlaXNSZW5kYUFjYWJhZG9zPg0KCQkJCQk8SW1vdmVpc1JlbmRhQ29uc3RydWNhbz4wPC9JbW92ZWlzUmVuZGFDb25zdHJ1Y2FvPg0KCQkJCQk8SW1vdmVpc1ZlbmRhQWNhYmFkb3M+MDwvSW1vdmVpc1ZlbmRhQWNhYmFkb3M+DQoJCQkJCTxJbW92ZWlzVmVuZGFDb25zdHJ1Y2FvPjA8L0ltb3ZlaXNWZW5kYUNvbnN0cnVjYW8+DQoJCQkJCTxPdXRyb3NEaXJlaXRvc1JlYWlzPjA8L091dHJvc0RpcmVpdG9zUmVhaXM+DQoJCQkJPC9EaXJlaXRvc0JlbnNJbW92ZWlzPg0KCQkJCTxBY29lcz4wPC9BY29lcz4NCgkJCQk8RGViZW50dXJlcz4wPC9EZWJlbnR1cmVzPg0KCQkJCTxCb251c1N1YnNjcmljYW8+MDwvQm9udXNTdWJzY3JpY2FvPg0KCQkJCTxDZXJ0aWZpY2Fkb3NEZXBvc2l0b1ZhbE1vYj4wPC9DZXJ0aWZpY2Fkb3NEZXBvc2l0b1ZhbE1vYj4NCgkJCQk8Q2VkdWxhc0RlYmVudHVyZXM+MDwvQ2VkdWxhc0RlYmVudHVyZXM+DQoJCQkJPEZJQT4wPC9GSUE+DQoJCQkJPEZJUD4wPC9GSVA+DQoJCQkJPEZJST4wPC9GSUk+DQoJCQkJPEZESUM+MDwvRkRJQz4NCgkJCQk8T3V0cmFzQ290YXNGST4wPC9PdXRyYXNDb3Rhc0ZJPg0KCQkJCTxOb3Rhc1Byb21pc3Nvcmlhcz4wPC9Ob3Rhc1Byb21pc3Nvcmlhcz4NCgkJCQk8QWNvZXNTb2NpZWRhZGVzQXRpdkZJST4wPC9BY29lc1NvY2llZGFkZXNBdGl2RklJPg0KCQkJCTxDb3Rhc1NvY2llZGFkZXNBdGl2RklJPjA8L0NvdGFzU29jaWVkYWRlc0F0aXZGSUk+DQoJCQkJPENFUEFDPjA8L0NFUEFDPg0KCQkJCTxDUkk+MDwvQ1JJPg0KCQkJCTxMZXRyYXNIaXBvdGVjYXJpYXM+MDwvTGV0cmFzSGlwb3RlY2FyaWFzPg0KCQkJCTxMQ0k+MDwvTENJPg0KCQkJCTxMSUc+MDwvTElHPg0KCQkJCTxPdXRyb3NWYWxvcmVzTW9ibGlhcmlvcz4wPC9PdXRyb3NWYWxvcmVzTW9ibGlhcmlvcz4NCgkJCTwvVG90YWxJbnZlc3RpZG8+DQoJCQk8VmFsb3Jlc1JlY2ViZXIgdG90YWw9IjQ5MzYzMDAuMDQiPg0KCQkJCTxBbHVndWVpcz40NzU4NjkwLjY5PC9BbHVndWVpcz4NCgkJCQk8VmVuZGFJbW92ZWlzPjA8L1ZlbmRhSW1vdmVpcz4NCgkJCQk8T3V0cm9zVmFsb3Jlcz4xNzc2MDkuMzU8L091dHJvc1ZhbG9yZXM+DQoJCQk8L1ZhbG9yZXNSZWNlYmVyPg0KCQk8L0luZm9ybWFjb2VzQXRpdm8+DQoJCTxJbmZvcm1hY29lc1Bhc3Npdm8+DQoJCQk8UmVuZGltZW50b3NEaXN0cmlidWlyPjEwNzkyMTIyLjY0PC9SZW5kaW1lbnRvc0Rpc3RyaWJ1aXI+DQoJCQk8VHhBZG1pbmlzdHJhY2FvUGFnYXI+MTYxMTU0LjIzPC9UeEFkbWluaXN0cmFjYW9QYWdhcj4NCgkJCTxUeFBlcmZvcm1hbmNlUGFnYXI+MDwvVHhQZXJmb3JtYW5jZVBhZ2FyPg0KCQkJPE9icmlnYWNvZXNBcXVpc2ljYW9JbW92PjMwNjk2NDg3My43NjwvT2JyaWdhY29lc0FxdWlzaWNhb0ltb3Y+DQoJCQk8QWRpYW50YW1lbnRvVmVuZGFJbW92PjA8L0FkaWFudGFtZW50b1ZlbmRhSW1vdj4NCgkJCTxBZGlhbnRhbWVudG9BbHVndWVpcz4wPC9BZGlhbnRhbWVudG9BbHVndWVpcz4NCgkJCTxPYnJpZ2Fjb2VzU2VjUmVjZWJpdmVpcz4wPC9PYnJpZ2Fjb2VzU2VjUmVjZWJpdmVpcz4NCgkJCTxJbnN0cnVtZW50b3NGaW5hbmNlaXJvc0Rlcml2PjA8L0luc3RydW1lbnRvc0ZpbmFuY2Vpcm9zRGVyaXY+DQoJCQk8UHJvdmlzb2VzQ29udGlnZW5jaWFzPjA8L1Byb3Zpc29lc0NvbnRpZ2VuY2lhcz4NCgkJCTxPdXRyb3NWYWxvcmVzUGFnYXI+MTMyNjc1MDA8L091dHJvc1ZhbG9yZXNQYWdhcj4NCgkJCTxUb3RhbFBhc3Npdm8+MzMxMTg1NjUwLjYzPC9Ub3RhbFBhc3Npdm8+DQoJCTwvSW5mb3JtYWNvZXNQYXNzaXZvPg0KCTwvSW5mb3JtZU1lbnNhbD4NCjwvRGFkb3NFY29ub21pY29GaW5hbmNlaXJvcz4="
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...