Necklace delete duplicates in Julia

using BenchmarkTools

function canonical(t::Vector{Int64})
  n = length(t)
  sortcols(cat(2,
    (circshift(t,x) for x=0:(n-1))...,
    (circshift(reverse(t), x) for x=0:(n-1))...
  )
  )[:,1]
end

function deleteNecklaceDuplicates(list)
  listCanonical = [(canonical(list[i,:]) for i=1:size(list,1))...]
  unique(listCanonical)
end

largelist = rand(1:3,5000,15);
@benchmark deleteNecklaceDuplicates(largelist)