Create new records from keyword list

Since your data is small, try buffering the table and list into memory before defining the custom column.

Working from cgao's code, this might look like:

let
  Source = Table.FromRows(
    Json.Document(
      Binary.Decompress(
        Binary.FromText(
          "i45WMlTSUUrKTFdIKsovz1NITixRitWJVjICihZnJKanVyqk5+ekpOYppOSng2WMgTL5RYl56alwxSYgI3ISk7NBIgqJeSlQw8BaYgE=",
          BinaryEncoding.Base64
        ),
        Compression.Deflate
      )
    ),
    let
      _t = ((type nullable text) meta [Serialized.Text = true])
    in
      type table [#"Title Index" = _t, #"Title cleaned" = _t]
  ),
  #"Changed Type" = Table.TransformColumnTypes(
    Source,
    {{"Title Index", Int64.Type}, {"Title cleaned", type text}}
  ),
  BufferedKeywords = List.Buffer(Keywords),
  BufferedTable = Table.Buffer(#"Changed Type"),
  #"Added Custom" = Table.AddColumn(
    BufferedTable,
    "Contains Keyword",
    each List.Intersect({BufferedKeywords, Text.Split([Title cleaned], " ")}),
    type list
  ),
  #"Expanded Contains Keyword" = Table.ExpandListColumn(#"Added Custom", "Contains Keyword")
in
  #"Expanded Contains Keyword"