John Deere Insights

termino <- c("John Deere")
ubicacion <- c("US")
canal <- "web"
periodo <- ("2020-01-01 2022-09-01")
tendencia1 <- gtrends(termino, ubicacion, canal, time = periodo)
plot(tendencia1)

termino <- c("Agriculture")
ubicacion <- c("US")
canal <- "web"
periodo <- ("2020-01-01 2022-09-01")
tendencia2 <- gtrends(termino, ubicacion, canal, time = periodo)
plot(tendencia2)

termino <- c("Innovation in agriculture")
ubicacion <- c("US")
canal <- "web"
periodo <- ("2020-01-01 2022-09-01")
tendencia3 <- gtrends(termino, ubicacion, canal, time = periodo)
plot(tendencia3)

termino <- c("Sustainability")
ubicacion <- c("US")
canal <- "web"
periodo <- ("2020-01-01 2022-09-01")
tendencia4 <- gtrends(termino, ubicacion, canal, time = periodo)
plot(tendencia4)

LS0tCnRpdGxlOiAiR2xvYmFsIFRyZW5kcyIKYXV0aG9yOiAiRXJpY2thIE1hcnRpbmV6IC0gQTAxMTc3MDE3IgpkYXRlOiAiMjAyMi0wOS0wNyIKb3V0cHV0OiAKICBodG1sX2RvY3VtZW50OgogICAgdG9jOiB0cnVlCiAgICB0b2NfZmxvYXQ6IHRydWUKICAgIGNvZGVfZG93bmxvYWQ6IHRydWUKLS0tCiMjIDxpbWcgc3JjPSAiL1VzZXJzL0VyaWNrYU10ei9EZXNrdG9wL3Vzc3VyaS10aWdlci1zaWJlcmlhbi10aWdlci05MTEuanBlZyI+CgojIyA8c3BhbiBzdHlsZT0iY29sb3I6ICNFRTlBNDkiID4gKipHbG9iYWwgVHJlbmRzOiBUaWdlciBLaW5nKiogPC9zcGFuPgoKIyMjIDxzcGFuIHN0eWxlPSJjb2xvcjogI0VFOUE0OSIgPiBIZXJyYW1pZW50YSAiRWwgR2VuZXJhZG9yIGRlIFZhbG9yIGRlIERhdG9zIiAgPC9zcGFuPgoKKipQYXNvIDEuKiogRGVmaW5pciBlbCDDoXJlYSBkZWwgbmVnb2NpbyBxdWUgYnVzY2Ftb3MgaW1wYWN0YXIgbyBtZWpvcmFyIHN1IEtQSS4gICAgCkVsICoqZGVwYXJ0YW1lbnRvIGRlIG1lcmNhZG90ZWNuaWEgKiogc2Vyw6EgZWwgaW1wYWN0YWRvIHkgZWwgKktQSSogYSBtZWRpciBzZXLDoSBlbCBuaXZlbCBkZSByZXByb2R1Y2Npb25lcyBkZSB1bmEgc2VyaWUgZW4gdW4gc2VydmljaW8gZGUgc3RyZWFtaW5nLiAgCioqUGFzbyAyLioqIFNlbGVjY2lvbmFyIHBsYW50aWxsYSAoLXMpIHBhcmEgY3JlYXIgdmFsb3IgYSBwYXJ0aXIgZGUgbG9zIGRhdG9zIGRlIGxvcyBjbGllbnRlcyAgICAgCioqVmlzacOzbioqIC8gKipTZWdtZW50YWNpw7NuKiogLyBQZXJzb25hbGl6YWNpw7NuIC8gQ29udGV4dHVhbGl6YWNpw7NuICAgICAgCioqUGFzbyAzLioqIEdlbmVyYXIgaWRlYXMgbyBjb25jZXB0b3MgZXNwZWPDrWZpY29zICAgICAgCkFuYWxpemFyIGVsIGNvbXBvcnRhbWllbnRvIGRlIGNvbnN1bWlkb3JlcyBoYWNpYSB1biB0ZW1hIGVuIGVzZWPDrWZpY28gYSB0cmF2w6lzIGRlbCB0aWVtcG8sIGVuIGVzdGUgY2FzbyB1bmEgZG9jdXNlcmllLCBlbiB1biBzZXJ2aWNpbyBkZSBzdHJlYW1pbmcuICAKKipQYXNvIDQuKiogIFJldW5pciBsb3MgZGF0b3MgcmVxdWVyaWRvcyAgICAKRWxhYm9yYXIgdW5hIGdyw6FmaWNhIHF1ZSBtdWVzdHJlIGxvcyBkaXN0aW50b3MgcGljb3MgZGUgcG9wdWxhcmlkYWQgYSB0cmF2w6lzIGRlIGxvcyBhw7Fvcy4gICAgCioqUGFzbyA1LioqIFBsYW4gZGUgZWplY3VjacOzbi4gICAgCkFsIG9idGVuZXIgdW5hIHJlc3B1ZXN0YSBkZWwgY29tcG9ydGFtaWVudG8gZGVsIGNvbnN1bWlkb3IsIHNlIHB1ZWRlIGdlbmVyYXIgdW5hIGVzdHJhdGVnaWEgcGFyYSBzYWJlciBlbiBxdWUgdGlwbyBkZSBzaXR1YWNpb25lcyBvIHBlcmlvZG9zIGhhYnLDrWEgbWF5b3IgcG9wdWxhcmlkYWQgZW4gYWxndW5hIGRvY3VzZXJpZSBkZW50cm8gZGUgdW4gc2VydmljaW8gc3RyZWFtaW5nLiBTZSBwb2Ryw61hIHBsYW5lYXIgZWwgbGFuemFtaWVudG8gZGUgdW4gZXN0cmVubyBjdWFuZG8gbGEgc2l0dWFjacOzbiBzZWEgcGFyZWNpZG8gYSBjdWFuZG8gaHVibyB1biBwaWNvIGRlIHRlbGV2aWRlbnRlcy4gICAgCgojIyMgTGlicmVyw61hcyBJbnRhbGFkYXMKYGBge3J9CmxpYnJhcnkodGlkeXZlcnNlKQojaW5zdGFsbC5wYWNrYWdlcygiZ3RyZW5kc1IiKQpsaWJyYXJ5KGd0cmVuZHNSKQpgYGAKCiMjIyA8c3BhbiBzdHlsZT0iY29sb3I6ICNFRTlBNDkiID4gUGFzbyAxLiBEZWZpbmlyIGVsIHTDqXJtaW5vIGEgYnVzY2FyIDwvc3Bhbj4KYGBge3J9CnRlcm1pbm8gPC0gYygiVGlnZXIgS2luZyIpCmBgYAoKIyMjIFBhc28gMi4gRGVmaW5pciBsYSBsb2NhbGl6YWNpw7NuIChJU08zMTY2LTIgY291bnRyeSBjb2RlcykgPC9zcGFuPgpgYGB7cn0KdWJpY2FjaW9uIDwtIGMoIlVTIikKYGBgCgojIyMgPHNwYW4gc3R5bGU9ImNvbG9yOiAjRUU5QTQ5IiA+IFBhc28gMy4gRGVmaW5pciBlbCBjYW5hbDogd2ViLCBuZXdzLCBpbWFnZXMsIFlvdVR1YmUgPC9zcGFuPgpgYGB7cn0KY2FuYWwgPC0gIndlYiIKYGBgCgojIyMgUGFzbyA0LiBEZWZpbmlyIGxhIHZlbnRhbmEgZGUgdGllbXBvCmBgYHtyfQpwZXJpb2RvIDwtICgiMjAyMC0wMS0wMSAyMDIyLTA5LTAxIikKYGBgCgojIyMgPHNwYW4gc3R5bGU9ImNvbG9yOiAjRUU5QTQ5IiA+IFBhc28gNS4gRnVuY2nDs24gPC9zcGFuPgpgYGB7cn0KdGVuZGVuY2lhIDwtIGd0cmVuZHModGVybWlubywgdWJpY2FjaW9uLCBjYW5hbCwgdGltZSA9IHBlcmlvZG8pCnBsb3QodGVuZGVuY2lhKQpgYGAKCiMjIyBDb25jbHVzaW9uZXMKPHAgc3R5bGU9J3RleHQtYWxpZ246anVzdGlmeTsnPiAqKkxhcyB0ZW5kZW5jaWFzIGdsb2JhbGVzIG5vcyBwZXJtaXRlbiBhbmFsaXphciBlbCBjb21wb3J0YW1pZW50byBkZSB1biBjb25qdW50byBkZSBwZXJzb25hcyByZXNwZWN0byBhIGFsZ8O6biB0ZW1hIGVuIGVzcGVjw61maWNvLiBTZSBwdWVkZW4gb2J0ZW5lciBkYXRvcyByZWxldmFudGVzIGRlIHNpIGFsZ8O6biBwcm9kdWN0bywgdGVtYSBvIHNlcnZpY2lvIHZhIGVuIGNyZWNpbWllbnRvIGRlIGRlbWFuZGEgbyBzaSBzZSBlbmN1ZW50cmEgZW4gdW4gcHVudG8gYmFqby4gRGVjaWTDrSBoYWNlciBlbCBlamVyY2ljaW8gY29uIGVsIG5vbWJyZSBkZSBsYSBzZXJpZSAqVGlnZXIgS2luZyogZGViaWRvIGEgcXVlIGZ1ZSB1biDDqXhpdG8gdG90YWwgZHVyYW50ZSBwYW5kZW1pYSB5IGRlc3B1w6lzIGRlIGVzbyBzZSBvbHZpZMOzIGVsIHRlbWEuIFNlbnTDrSBsYSBjdXJpb3NpZGFkIGRlIHZlciBzaSBlc3RvcyBkaWZlcmVudGVzIHBpY29zIHNlIGliYW4gYSBtb3N0cmFyIGRlbnRybyBkZSBsYSBncsOhZmljYSB5IGFzw60gZnVlIHlhIHF1ZSBzZSBwdWVkZSBvYnNlcnZhciBxdWUgc3UgcHVudG8gbcOhcyBwb3B1bGFyIGZ1ZSBlbiBlbCAyMDIwIHkgZGVzcHXDqXMgZGUgZXNvIGRpc21pbnV5w7MuKiogPC9wPgoKIyMgPGltZyBzcmM9ICIvVXNlcnMvRXJpY2thTXR6L0Rlc2t0b3AvMjAyMTMxOC5qcGVnIj4KCiMjIDxzcGFuIHN0eWxlPSJjb2xvcjogZ3JlZW4iID4gKipKb2huIERlZXJlIEluc2lnaHRzKiogPC9zcGFuPgoKYGBge3J9CnRlcm1pbm8gPC0gYygiSm9obiBEZWVyZSIpCnViaWNhY2lvbiA8LSBjKCJVUyIpCmNhbmFsIDwtICJ3ZWIiCnBlcmlvZG8gPC0gKCIyMDIwLTAxLTAxIDIwMjItMDktMDEiKQp0ZW5kZW5jaWExIDwtIGd0cmVuZHModGVybWlubywgdWJpY2FjaW9uLCBjYW5hbCwgdGltZSA9IHBlcmlvZG8pCnBsb3QodGVuZGVuY2lhMSkKYGBgCgpgYGB7cn0KdGVybWlubyA8LSBjKCJBZ3JpY3VsdHVyZSIpCnViaWNhY2lvbiA8LSBjKCJVUyIpCmNhbmFsIDwtICJ3ZWIiCnBlcmlvZG8gPC0gKCIyMDIwLTAxLTAxIDIwMjItMDktMDEiKQp0ZW5kZW5jaWEyIDwtIGd0cmVuZHModGVybWlubywgdWJpY2FjaW9uLCBjYW5hbCwgdGltZSA9IHBlcmlvZG8pCnBsb3QodGVuZGVuY2lhMikKYGBgCgpgYGB7cn0KdGVybWlubyA8LSBjKCJJbm5vdmF0aW9uIGluIGFncmljdWx0dXJlIikKdWJpY2FjaW9uIDwtIGMoIlVTIikKY2FuYWwgPC0gIndlYiIKcGVyaW9kbyA8LSAoIjIwMjAtMDEtMDEgMjAyMi0wOS0wMSIpCnRlbmRlbmNpYTMgPC0gZ3RyZW5kcyh0ZXJtaW5vLCB1YmljYWNpb24sIGNhbmFsLCB0aW1lID0gcGVyaW9kbykKcGxvdCh0ZW5kZW5jaWEzKQpgYGAKCmBgYHtyfQp0ZXJtaW5vIDwtIGMoIlN1c3RhaW5hYmlsaXR5IikKdWJpY2FjaW9uIDwtIGMoIlVTIikKY2FuYWwgPC0gIndlYiIKcGVyaW9kbyA8LSAoIjIwMjAtMDEtMDEgMjAyMi0wOS0wMSIpCnRlbmRlbmNpYTQgPC0gZ3RyZW5kcyh0ZXJtaW5vLCB1YmljYWNpb24sIGNhbmFsLCB0aW1lID0gcGVyaW9kbykKcGxvdCh0ZW5kZW5jaWE0KQpgYGAK