Write SQL query to solve given problem: Among the products that have a retail price greater than 1,000, how many products were shipped via ship?. Keep the solution inside sql tag ```sql [SQL-Query] ```
SELECT COUNT(T1.ps_suppkey) FROM partsupp AS T1 INNER JOIN lineitem AS T2 ON T1.ps_suppkey = T2.l_suppkey INNER JOIN part AS T3 ON T1.ps_partkey = T3.p_partkey WHERE T3.p_retailprice > 1000 AND T2.l_shipmode = 'SHIP'