package main

import (
	"bufio"
	"container/heap"
	"fmt"
	"os"
	"strconv"
)

var sc = bufio.NewScanner(os.Stdin)

func main() {
	sc.Split(bufio.ScanWords)
	t := nextInt()

	for p := 0; p < t; p++ {
		n, c := nextInt(), 0
		m, q := make(map[int]int), make(pQ, 0, 1000)
		for i := 0; i < n; i++ {
			m[nextInt()]++
		}

		heap.Init(&q)
		for k, v := range m {
			heap.Push(&q, [2]int{k, v})
		}

		for {
			kd := make([][2]int, 0, 3)
			for i := 0; i < 3; i++ {
				if q.Len() == 0 {
					break
				}
				kd = append(kd, heap.Pop(&q).([2]int))
			}
			if len(kd) < 3 {
				break
			}

			for _, v := range kd {
				v[1]--
				if v[1] > 0 {
					heap.Push(&q, v)
				}
			}
			c++
		}
		fmt.Println(c)
	}
}

func nextLine() string {
	sc.Scan()
	return sc.Text()
}

func nextInt() int {
	i, _ := strconv.Atoi(nextLine())
	return i
}

type pQ [][2]int

func (h pQ) Len() int {
	return len(h)
}

func (h pQ) Less(i, j int) bool {
	return h[i][1] > h[j][1]
}

func (h pQ) Swap(i, j int) {
	h[i], h[j] = h[j], h[i]
}

func (h *pQ) Push(x interface{}) {
	*h = append(*h, x.([2]int))
}

func (h *pQ) Pop() interface{} {
	x := (*h)[len(*h)-1]
	*h = (*h)[0 : len(*h)-1]
	return x
}