Error while reading multiple(28000) jsons in to dataframe

I have a folder with 28000 json files. I am trying to read them all at once and it throws an error. Below is the link for the data :

http://lherranz.org/local/datasets/yummly28k/Yummly28K.rar

This is what I have tried so far

library(purrr)
library(tidyverse)
library(jsonlite)

path <- getwd()
files <- dir(path, pattern = "*.json")

data <- files %>%
  map_df(~fromJSON(file.path(path, .), flatten = TRUE))

The error

Error: Tibble columns must have consistent sizes, only values of size one are recycled:
* Size 11: Existing data
* Size 4: Column `attribution`