Error:DataStore Save Table ?

So , i tried a new Method for the Data Store put now i get the error "ServerScriptService.HallowenGates:57: attempt to index nil with number"

Here's The Code:

local DataStoreService = game:GetService("DataStoreService")
local dataStore = DataStoreService:GetDataStore("HalloweenGatesStore") -- This can be changed to whatever you want

local function saveData(player) -- The functions that saves data

	local tableToSave = {
		player.HalloweenGates.PumpkinCave.Value; -- First value from the table
		player.HalloweenGates.GiantPumpkin.Value; -- Second value from the table
		player.HalloweenGates.HauntedEntrance.Value; -- Third
		player.HalloweenGates.HauntedBiome.Value --Fourthed
	}

	local success, err = pcall(function()
		dataStore:SetAsync(player.UserId, tableToSave) -- Save the data with the player UserId, and the table we wanna save
	end)

	if success then -- If the data has been saved
		print("Data has been saved!")
	else -- Else if the save failed
		print("Data hasn't been saved!")
		warn(err)		
	end
end

game.Players.PlayerAdded:Connect(function(player) -- When a player joins the game

	-- // Assigning player stats //
		local HalloweenGates = Instance.new("Folder")
	HalloweenGates.Name = "HalloweenGates"
	HalloweenGates.Parent = player
	
	local PumpkinCave = Instance.new("BoolValue")
	PumpkinCave.Name = "Pumpkincave"
	PumpkinCave.Parent = HalloweenGates
	
	local GiantPumpkin = Instance.new("BoolValue")
	GiantPumpkin.Name = "GiantPumpkin"
	GiantPumpkin.Parent = HalloweenGates
	
	local HauntedEntrance = Instance.new("BoolValue")
	HauntedEntrance.Name = "HauntedEntrance"
	HauntedEntrance.Parent = HalloweenGates
	
	local HauntedBiome = Instance.new("BoolValue")
	HauntedBiome.Name = "HauntedBiome"
	HauntedBiome.Parent = HalloweenGates

	local data -- We will define the data here so we can use it later, this data is the table we saved
	local success, err = pcall(function()

		data = dataStore:GetAsync(player.UserId) -- Get the data from the datastore

	end)

	if success then -- If there were no errors and player loaded the data

		PumpkinCave.Value = data[1] -- Set the Value to the first value of the table (data)
		GiantPumpkin.Value = data[2] -- Set the Value to the second value of the table (data)
		HauntedEntrance.Value = data[3]--  ^^
		HauntedBiome.Value = data[4]--     ^^

	else -- The player didn't load in the data, and probably is a new player
		print("The player has no data!") -- The default will be set to 0
	end

end)

game.Players.PlayerRemoving:Connect(function(player) -- When a player leaves
	local success, err  = pcall(function()
		saveData(player) -- Save the data
	end)

	if success then
		print("Data has been saved")
	else
		print("Data has not been saved!")
	end
end)

game:BindToClose(function() -- When the server shuts down
	for _, player in pairs(game.Players:GetPlayers()) do -- Loop through all the players
		local success, err  = pcall(function()
			saveData(player) -- Save the data
		end)

		if success then
			print("Data has been saved")
		else
			print("Data has not been saved!")
			warn(err)

end
end 
end)