Get Value By Key Object Array Javascript Append Function In R