Medium
Given a non-empty array nums
containing only positive integers, find if the array can be partitioned into two subsets such that the sum of elements in both subsets is equal.
Example 1:
Input: nums = [1,5,11,5]
Output: true
Explanation: The array can be partitioned as [1, 5, 5] and [11].
Example 2:
Input: nums = [1,2,3,5]
Output: false
Explanation: The array cannot be partitioned into equal sum subsets.
Constraints:
1 <= nums.length <= 200
1 <= nums[i] <= 100
(define/contract (can-partition nums)
(-> (listof exact-integer?) boolean?)
(let* ([sum (apply + nums)])
(if (odd? sum)
#f
(let* ([target (/ sum 2)]
[dp (make-hash)])
(hash-set! dp 0 #t)
(for ([num nums])
(for ([key (reverse (hash-keys dp))])
(let ([new-sum (+ key num)])
(when (<= new-sum target)
(hash-set! dp new-sum #t)))))
(hash-ref dp target #f)))))