The most interesting invariant of a K3 surfaces is its Picard group. A method for the computation was introduced by van Luijk. In this talk I will present my work on improving and testing this method.