# [Solved] AMATH482 Assignment1-A Submarine Problem

30 \$

SKU: [Solved] AMATH482 Assignment1-A Submarine Problem Category: Tag:

You are hunting for a submarine in the Puget Sound using noisy acoustic data. It is a new submarine technology that emits an unknown acoustic frequency that you need to detect. Using a broad spectrum recoding of acoustics, data is obtained over a 24-hour period in half-hour increments. Unfortunately, the submarine is moving, so its location and path need to be determined.

Try to locate the submarine and find its trajectory using the acoustic signature. Also identify the acoustic admissions of this new class of submarine. Go to CANVAS and download: subdata.mat. This contains 49 columns of data for measurements over a 24-hour span at half-hour increments in time.

You are being asked to perform the following:

1. Through averaging of the spectrum, determine the frequency signature (center frequency) generated by the submarine.
2. Filter the data around the center frequency determined above in order to denoise the data and determine the path of the submarine. Use plot3 to plot the path of the submarine once you have it.
3. Where should you send your P-8 Poseidon subtracking aircraft? Give the x and y coordinates in a table to follow the submarine.

Good luck, and I hope you track the submarine!

The following MATLAB code will help you get started in analyzing the data. It also tells you the spatial and spectral resolution of your acoustic equipment. (NOTE: the reason for the close all command before isosurface is that isosurface doesn’t seem to clear the previous image before plotting a new one.)

 1 % Clean workspace 2 clear all; close all; clc 34 load subdata.mat % Imports the data as the 262144×49 (space by time) matrix called subdata 56 L = 10; % spatial domain 7 n = 64; % Fourier modes 8 x2 = linspace(-L,L,n+1); x = x2(1:n); y =x; z = x; 9 k = (2*pi/(2*L))*[0:(n/2 – 1) -n/2:-1]; ks = fftshift(k); 1011 [X,Y,Z]=meshgrid(x,y,z); 12 [Kx,Ky,Kz]=meshgrid(ks,ks,ks); 1314 for j=1:49 15 Un(:,:,:)=reshape(subdata(:,j),n,n,n); 16 M = max(abs(Un),[],’all’); 17 close all, isosurface(X,Y,Z,abs(Un)/M,0.7) 18 axis([-20 20 -20 20 -20 20]), grid on, drawnow 19 pause(1) 20 end

## Reviews

There are no reviews yet.

Only logged in customers who have purchased this product may leave a review.

Shopping Cart
[Solved] AMATH482 Assignment1-A Submarine Problem
30 \$