رمز MATLAB لطريقة النسب الطيفية لتحديد الفترة الأساسية لذبذبة التربة