{"id":2902,"date":"2023-07-20T04:21:53","date_gmt":"2023-07-20T04:21:53","guid":{"rendered":"https:\/\/statorials.org\/pt\/funcao-de-agregacao-r-ausente-por-padrao-no-comprimento\/"},"modified":"2023-07-20T04:21:53","modified_gmt":"2023-07-20T04:21:53","slug":"funcao-de-agregacao-r-ausente-por-padrao-no-comprimento","status":"publish","type":"post","link":"https:\/\/statorials.org\/pt\/funcao-de-agregacao-r-ausente-por-padrao-no-comprimento\/","title":{"rendered":"Como corrigir em r: fun\u00e7\u00e3o agregada ausente, o padr\u00e3o \u00e9 \u201ccomprimento\u201d"},"content":{"rendered":"

<\/p>\n

\n

Um erro que voc\u00ea pode encontrar ao usar R \u00e9:<\/span><\/p>\n

 Aggregation function missing: defaulting to length\n<\/strong><\/span><\/pre>\n
 Este erro ocorre quando voc\u00ea usa a fun\u00e7\u00e3o dcast<\/strong> no pacote reshape2<\/strong> para converter um quadro de dados de um formato longo para um formato largo<\/a> , mas v\u00e1rios valores podem ser colocados nas c\u00e9lulas individuais do quadro de dados largo.<\/span><\/p>\n
 O exemplo a seguir mostra como corrigir esse erro na pr\u00e1tica.<\/span><\/p>\n
 Como reproduzir o erro<\/strong><\/span><\/h3>\n
 Suponha que temos o seguinte quadro de dados em R que cont\u00e9m informa\u00e7\u00f5es sobre vendas de v\u00e1rios produtos:<\/span><\/p>\n
 #create data frame\n<\/span>df <- data. frame<\/span> (store=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),\n                 promotion=c('Y', 'Y', 'N', 'N', 'Y', 'Y', 'N', 'N'),\n                 product=c(1, 2, 1, 2, 1, 2, 1, 2),\n                 sales=c(12, 18, 29, 20, 30, 11, 15, 22))\n\n#view data frame\n<\/span>df\n\n  store promotion product sales\n1 AY 1 12\n2 AY 2 18\n3 YEAR 1 29\n4 YEAR 2 20\n5 BY 1 30\n6 BY 2 11\n7 BN 1 15\n8 BN 2 22<\/span><\/span><\/strong><\/pre>\n
 Agora suponha que tentamos usar a fun\u00e7\u00e3o dcast<\/strong> para converter o quadro de dados do formato longo para o formato largo:<\/span><\/span><\/p>\n
 library<\/span> (reshape2)\n\n#convert data frame to wide format\n<\/span>df_wide <- dcast(df, store ~ product, value. var<\/span> = \" sales<\/span> \")\n\n#view result\n<\/span>df_wide\n\nAggregation function missing: defaulting to length\n  store 1 2\n1 to 2 2\n2 B 2 2<\/span><\/span><\/strong><\/pre>\n
 Observe que a fun\u00e7\u00e3o dcast funciona, mas recebemos a mensagem de aviso Aggregate Function Missing<\/strong> .<\/span><\/span><\/p>\n
 Como corrigir o erro<\/strong><\/span><\/h3>\n
 A raz\u00e3o pela qual recebemos uma mensagem de aviso \u00e9 porque para cada combina\u00e7\u00e3o de loja<\/strong> e produto<\/strong> , existem dois valores potenciais que poder\u00edamos usar para vendas<\/strong> .<\/span><\/p>\n
 Por exemplo, para a loja A e o produto 1, o valor de vendas poderia ser 12 ou 29.<\/span><\/p>\n
 Portanto, o padr\u00e3o da fun\u00e7\u00e3o dcast<\/strong> \u00e9 \u201ccomprimento\u201d como sua fun\u00e7\u00e3o de agrega\u00e7\u00e3o.<\/span><\/p>\n
 Por exemplo, o grande banco de dados nos diz que para a loja A e o produto 1, h\u00e1 um total de 2<\/strong> valores de vendas.<\/span><\/p>\n
 Se quiser usar uma fun\u00e7\u00e3o de agrega\u00e7\u00e3o diferente, voc\u00ea pode usar fun.agregate<\/strong> .<\/span><\/p>\n
 Por exemplo, podemos usar a seguinte sintaxe para calcular a soma das vendas por loja<\/strong> e produto<\/strong> :<\/span><\/p>\n
 library<\/span> (reshape2)\n\n#convert data frame to wide format\n<\/span>df_wide <- dcast(df, store ~ product, value. var<\/span> = \" sales<\/span> \", fun. aggregate<\/span> =sum)\n\n#view result<\/span>\ndf_wide\n\n  store 1 2\n1 A 41 38\n2 B 45 33\n<\/span><\/span><\/strong><\/pre>\n
 Veja como interpretar os valores no grande quadro de dados:<\/span><\/p>\n